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CLUB DE MAIL 



Nueva sección de compr 
útiles. 




Te indicamos cómo 
funciona la ampliación 
del Basic msx. 



ATREVETE SSS UTILIDADES 

MAS PRACTICAS PARA TU MSX 



1.0. PABELLON 1< 
NIVEL SUPERIOR STAND C 18 






Disponer de una sensacional calculadora residente 
en tu MSX, a tu alcance en cualquier instante, con i 
tocar un tecla. Un reloj alarma programable. 

Copiar por impresora las pantallas de tus programas. 
Crear fantásticos efectos de animación. Disponer 
formidables editores de sprites y avanzadas 
instrucciones para su manejo. ¡¡IMAGINA!! 
Consultar un completo prontuario de tu 

BASIC MSX interactivamente... sólo con 
conectar uno de nuestros programas y 
a funcionar! ¡ASI DE FACIL! 




SUPER SPRITES 



Permite acceder a múltiples funciones desde cual- 
quier programa dada su transparencia. Entre otras 
nos proporciona una potente calculadora científi- 
ca, reloj alarma programable, copia de pantallas 
por impresora... SIDE PACK será un inseparable 
de tu ordenador. 



gestión y edición de nuestro MSX. Po- ^ 
tente editor de formas de distintos tama- 
ños y colores, pudiendo ser salvadas o car- 
gadas desde cualquier otro programa, permi- 
tiendo el control de velocidad, orientación y 
cambio de formas de sprites. 



V 



La más potente calcula- 
dora científica que puedes comprar para 
tu ordenador. Programa pensado para 
todas aquellas personas que requieran 
un potente soporte matemático, rápido 
y sencillo de usar. 



IDEA TEXT 




Procesador de textos de fácil ma- 
nejo. Máxima potencia de trabajo. 



42 K libres de Memoria. EDITOR de 
página entera con control total de már- 
genes, identaciones, centrado, espacios, 
encabezados, pies de página, movimiento e 
inserción de bloques, etc. Trabaja con cualquier 
impresora. Compatible con IDEA BASE y DIM 
CALC. Permite salvar en cinta o disco. 



IDEA BASE 

Impresión de etiquetas y listados. 42 K de me- 
moria libre de trabajo. Ordenación de registros. 
Menús conversacionales e interactivos. 
Puede salvar o grabar en cinta o disco. 
Es compatible con IDEA TEXT y DIM CALC. 



IDEALOGIC 



c/. Valencia, 85 — 08029 Barcelon 

TpY ?W 74 00 - ?K 90 4S 



Editorial 



MSX EN EXPANSION 

El estándar MSX goza de buena salud. 
A pesar de los embates de los 
ordenadores de la competencia, ya que 
no podemos hablar de norma pues tales 
aparatos carecen de ella, el sistema 
MSX mantiene unos excelentes niveles 
de ventas según fuentes fidedignas. 
Pero no se trata sólo de mantener el 
mercado, sino de expandirlo a todos los 
niveles. 

Para ello los principales fabricantes han 
decidido intensificar sus campañas y, 
sobre todo, dar una mayor información 
al usuario acerca de las peculiaridades 
de los aparatos MSX, tanto de la 
primera como de la segunda 
generación. 

En este punto es de esperar que la 
información sea fundamentalmente 
esclarecedora en dos aspectos. En el 
primero poner en conocimiento de los 
usuarios de MSX de la primera 
generación, que no se verán 
desasistidos pues la misma tiene cuerda 
para rato, ya que la segunda generación 
es un avance destinado a aquellos 
profesionales que necesiten de una 
mayor capacidad gráfica. Una 
capacidad gráfica que no tiene, por 
ejemplo, los grandes ordenadores 
personales, los cuales están destinados 
a la gestión de empresas. 
El segundo de los aspectos es destacar 
la validez del sistema MSX no sólo en 
cuanto a su compatibilidad inter 
aparatos, sino en su compatibilidad con 
aparatos de la gama IBM, la cual por 
cierto muy pronto sacará una máquina 
con diskettes de 3,5", y con periféricos 
que permitirán el acceso directamente 
desde el hogar a bancos de datos, 
cuentas corrientes bancarias, 
comunicaciones vía modem, etc. 
Además de lo apuntado hay otro dato 
que indica la buena salud del estándar. 
La compañía Sony, entre otras, iniciará 
en breve la comercialización de MSX 
en Portugal. Asimismo en Argentina, 
donde MSX CLUB es bien conocida de 
los usuarios del Talent MSX, y desde 
hace unos meses del Spectravídeo, 
también se comercializarán otras 
marcas MSX como la Hitachi, por 
ejemplo. 

Por encima de las modas o las 
prepotencias publicitarias, no cabe 
duda de que la norma se expande por el 
mundo. 

MANHATTAN TRANSFER, S.A. 
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LINEA DIRECTA 

Respondemos a las in- 
quietudes de nuestros 
lectores y a los problemas 
técnicos que se les pre- 
sentan. 

TABLON DE ANUNCIOS 
Dos inserciones gratuitas 
para compra, venta e in- 
tercambio de software 
original. 

COLISION 
Por Joaquín López 
Tercera parte de la serie 
«En torno a los sprites». 

PROGRAMAS 

13 La Brisca 

24 Gráficos I 

26 La Grúa 

31 Teoría Química 

36 Merxe 

38 Gráficos II 




BASIC PLUS (I) 
Por Willy Miragall 
Posibilidad de trabajar 
con 35 pantallas e in- 
tercambiarlas instantá- 



neamente. 



11 



MONITOR AL DÍA 

Las novedades más 
teresantes dentro 
mundo de MSX. 



ín- 
del 



2* 
25 



MINIPROGRAMAS 

Un concurso para los que 
empiezan con el ordena- 
dor y también para los 
expertos. 

TERCER CONCURSO MSX 
Iniciamos el Tercer Con- 
curso de Programación 
MSX. 



II 



CAZA PIRATAS 
En el Centenario de la 
Convención de Berna 
procuramos hacer respe- 
tar los derechos de autor. 



msxclub 
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Línea directa 



UN POCO DE TODO 

Tengo un buen paquete de 
problemas que me han ido 
apareciendo: 

—¿Qué es la RAM di- 
námica? 

— ¿Dónde puedo conseguir 
un mapa con todas las ruti- 
nas BIOS, variables del sis- 
tema, etc.? Si no lo consigo, 
¿pensáis publicar uno vo- 
sotros? 

También tengo un par de 
quejas: 




a. m m o *-» 



■ »«,.»» * ■ * 




— En el «Especial Código 
Máquina» de MSX EXTRA 
no explicábais bien algunas 
variables del sistema. Por 
ejemplo: &HF6E4, pila usa- 
da en labores de recogida de 
basura. ¿A qué hacéis refe- 
rencia con eso? 
— ¿Por qué las casas de soft- 
ware tardan tanto en lanzar 
sus adaptaciones para MSX. 
Es una discriminación hacia 
el estándar o es falta de equi- 
pos de programadores espe- 
cializados en el manejo de 
ordenadores MSX? 
— ¿Existen instrucciones 
que actúen directamente so- 
bre el registro PC? No me 
refiero a instrucciones de 
salto tipo JP NN o deriva- 
das, sino a LD PC,NN, LD 
HL,PC, etc. 

— Si el Z80 no puede direc- 
cionar más allá de 65536 by- 
tes, ¿cómo es que hay orde- 
nadores de 128 Kbytes con 



un Z80 como micro? 

Javier Pérez Montes 
Barcelona 

— La RAM dinámica es un 
tipo de memoria de acceso 
aleatorio que necesita ser ali- 
mentada permanentemente, 
porque en otro caso pierde la 
información que contiene. 
La RAM estática, por el con- 
trario, permite desconectar el 
ordenador sin que se altere la 
información, aunque, a decir 
verdad, suele obtenerse a 
partir de RAM dinámica de 
bajo consumo alimentada 
con baterías. 

— Para obtener la informa- 
ción que desea sobre el siste- 
ma hay que ser, como míni- 
mo, primo de un alto cargo, 
puesto que ésta se halla en 
poder exclusivo de los fabri- 
cantes. Si te sirve de consue- 
lo, los programadores de esta 
casa estamos como tú, a la es- 
pera de conocer un poco más, 
gracias a la publicación de 
algún nuevo libro especiali- 
zado. La información extra 
la tenemos que conseguir a 
golpe de paciencia y desem- 
samblador, eso sí, la compar- 
timos con vosotros inmedia- 
tamente. 

— Detallar una por una to- 
das las variables del sistema 
es una tarea casi encilopédi- 
ca. Ten presente que ocupan 
algo más de tres mil bytes. 
En fin, en el número 23 de 
nuestra revista hermana 
MSX EXTRA, y dentro de 
la sección CALL, se explica 
qué es la «recogida de 
basura». 

— El motivo de que tarden 
tanto las adaptaciones al 
MSX no es otro que su difi- 
cultad. Hay que pensar que 
el estándar es de los pocos 
microordenadores que dis- 
fruta de un procesador de vi- 
deo independiente. El VDP 
está cargado de ventajas, pe- 
ro no puede competir en ve- 
locidad de acceso contra 
ordenadores que emplean 
parte de la memoria en con- 
tener la pantalla. Así, un 
programa fabricado para el 
SPECTRUM o para algún 
AMSTRAD puede resultar 
imposible de convertir a 



MSX si la velocidad de los 
gráficos es crítica. En contra- 
partida, un programa hecho 
para MSX que aproveche la 
facultad de manejar figuras 
móviles, quizás sea inadap- 
table a las referidas máqui- 
nas, ya que éstas no pueden 
manejar SPRITES. En la 
práctica, la conversión suele 
llevarse a buen término, 
aunque a costa de reescribir 
gran parte del programa. 
— No existe instrucción algu- 
na que controle directamente 
el PC. Las únicas son las de 
salto y los CALLS. Deduzco, 
empero, que lo que pretendes 
con algo como LD HL,PC es 
saber en qué lugar de la me- 
moria se encuentra la ejecu- 
ción del programa. Esto suele 
hacerse empleando algo pa- 
recido a esto: 
10 LD HL,hE9El 
20 LD (Dirección), HL 
30 CALL dirección 
La cosa funciona así: 
El registro HL es cargado 
con los códigos de POP HL y 
JP (HL)y su contenido pues- 
to en una posición de memo- 
ria en la que se sepa que no 
hay nada vital. Cuando el 
programa haga un CALL a 
la referida posición, lo pri- 
mero que encontrará será un 
POP HL, que servirá para 
sacar de la pila la dirección 
de retorno de la rutina y pa- 
sársela a HL. Como la si- 
guiente instrucción es un JP 
(HL ), el programa seguirá su 
ejecución en la siguiente ins- 
trucción al CALL, pero sa- 
biendo, gracias al registro 
HL, el lugar de la memoria 
donde nos encontramos. 
— En efecto, el Z80 no puede 
direccionar memoria más 
allá de 216. Sin embargo, el 
sistema MSX incorpora un 
CHIP encargado de conmu- 
tar páginas de memoria, de 
suerte que el microprocesa- 
dor pueda leer muchas pági- 
nas diferentes, en bloques de 
64K. Cada una de las pági- 
nas tiene una longitud de 
16K, y el sistema de conmu- 
tación de ranuras es capaz de 
manejar hasta 64 de éstas. 
Por consiguiente, la máxima 
memoria direccionable por 



los MSX es de 1M (1000K), 
aunque en un momento de- 
terminado sólo puede haber 
cuatro páginas a la vista de 
la CPU. 

Como puedes observar, es 
perfectamente factible que 
haya ordenadores de 128K (o 
más) con un 280. Por cierto, 
SONY presentó en la edición 
de SONIMAG del año pasa- 
do una tarjeta de 25 6K de 
RAM para los MSX, aunque 
no he vuelto a saber de ella. 




MODEM 



Desearía que me contestaran 
a estas dos preguntas: 
— ¿Qué precio tiene el MO- 
DEM MSX modelo 
SVI-808. 

— ¿Hay alguna impresora 
matricial que sea MSX y que 
escriba, por lo menos, en ro- 
jo y en negro? ¿Cuál es su 
precio? 

Jacobo Sánchez Luna 
Alicante 

—El MODEM/RS 232 que 
citas cuesta unas 17.000 ptas. 
— No hay ninguna impreso- 
ra matricial MSX que reúna 
las características que tú pi- 
des. Sin embargo, puedes 
tratar de adquirir una SEI- 
KOSHA GP-700 A, que dis- 
pone de un conector CEN- 
TRONICS compatible con 
los MSX. Es la única impre- 
sora en color asequible (unas 
75.000 ptas.), y puede impri- 
mir en negro, magenta, rojo, 
amarillo, verde, cyan y azul. 
Trabaja en 80 columnas a 50 
cps (caracteres por segundo). 
El inconveniente es que es 
incapaz de sacar los caracte- 
res gráficos de los MSX. 
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MLFX1 



Poseo un ordenador MIT- 
SUBISHI ML FX1 de 80K 
RAM. El problema es que 
los programas de más de 
32K no me cargan. Quizás 
sea debido a que tiene locali- 
zada la RAM en el slot 3. 
¿Qué se puede hacer para 
cargarlos? 

José Muñoz 
San Sebastián 

El fallo está donde tú dices. 
Ahora bien, la solución al 
problema no es nada sencilla. 
Lo único factible es desprote- 
ger cada programa y susti- 
tuir, desde el código máqui- 
na, todas las instrucciones 
OUT (hA8),hA0 por OUT 
(hA8),hAF. En fin, quizás lo 
más práctico sea resignarse a 
perder los programas que no 
cargan. De cualquier forma, 
el defecto no obedece a un 
fallo en el ordenador, que 
entra dentro del estándar, si- 
no a los programas que no 
tienen en cuenta que la 
RAM de las dos primeras pá- 
ginas puede instalarse en un 
slot diferente al 2. Suele su- 
ceder lo mismo que te ocurre 
a ti en los ordenadores con 
cartucho de ampliación. 









AYUDA A LOS JUECOS 

Aquí os mando un POKE 
para el programa CLAP- 
TON de MSX. Cargáis el 
programa con BLOAD 
«cas:». A continuación colo- 
cáis el siguiente POKE: PO- 
KE &HA069,n donde «n» 
es el número de vidas que 
queráis. Luego de esto, si 
hacéis POKE &HB1AA,9, 
los enemigos no os dispara- 
rán. Tras esto, sólo resta eje- 
cutar el programa y ya está. 

Francisco Javier Paz. 

(Madrid) 

Muchas gracias por el truco, 
estamos seguros de que todos 
los poseedores de CLAP- 
TON te lo agradecerán mu- 
cho más. 



ENSAMBLADOR 

Quisiera que me indicarais el 
precio de un ensamblador, 
en especial el «GEN» de 
SONY. Poseo un HIT-BIT 
HB55Pde 16K. ¿Puedo car- 
gar el ensamblador en mi 
ordenador? El ensamblador 
¿existe en cinta o en 
cartucho? 
Francisco Rubio Delgado 
(Salamanca) 

De poco te va a servir cono- 
cer el precio de «GEN» 



liÑCÜAJES" 



Me gustaría que me contes- 

" ran a ,as siguientes pe- 
guntas: F 

--¿Cuánto cuesta un cartu- 
ca w° un ca «ette de EN- 
SAMBLADOR > ?! X 
PASCAL? cX de 

pTía E S^ UegOC ° mando 
"-¿Qué debo hacer para que 
a ««lizar ONSPRIÍEGO- 
SUBel ordenador sólo cum- 
pla la condición cuando cho- 

SPRITES? determinado * 
--¿Cómo puedo conseguir 
que se invierta el dibujo de 
un carácter como cuando se 
coloca el cursor encima de 
dicho carácter? 

fW tu U f 8 , USt ° Crua ñes 
Castelldefels (Barcelona) 

-Tanto el compilador de 

BLADOR 0m0 d ENSÁM - 
cLt SC cncuen tran en 

d %n¿v an , en e/cat ¿Iogo 
r. El precio del pri- 



mero es de 4.400 ptas. y e ¿ 
A segundo de 3.900 ptí 
-Parece ser que el juego 
^^aaseradap/o 

ejemplar mismo 
—Para invertir un carácter 
es preciso encender todos /os 

l uedes hacerlo empleando la 

rtel T de U VRAA *> co- 
rrespondiente al patrón de 
"n carácter cualquiera, y [ 
asignas a la variable A. Pues 
**n, haciendo A=A XOR 
ff , con /eguirás invertir el 
estado de todos l os bits. Uní 
camente resta que pongas el 
resultado en el mkJ„ \ 

repi ta operación en los 
°f° h ' t¡ 1"' forman el Z 
raaer para obtener lo que 



(aproximadamente 4.000 
ptas.) si a tu ordenador no le 
amplías la memoria median- 
te una unidad de expansión a 
64K. «GEN» es comerciali- 
zado por SONY en formato 
de cassette. 



CUESTIONES DIVERSAS 

Quisiera hacer las siguientes 
preguntas: 

— ¿Para qué sirven las sali- 
das AUDIO/VIDEO? 
— ¿Existe alguna instrucción 
BASIC para la autoejecu- 
ción de los programas aparte 
de LOAD «...»,r? 
— ¿Existe algún interfaz para 




imprimir texto o imagen so- 
bre video? 

Adolfo Pérez 
(Santoña) 

La salida AUDIO que in- 
corporan los aparatos MSX 
está prevista para poder co- 
nectar el ordenador a un 
equipo de alta fidelidad. La 
salida video está pensada pa- 
ra conectar el ordenador a 
un monitor. 

Además de LOAD «...«,r, 
para la ejecución automática 
de programas existe una ins- 
trucción que no viene re- 
señada en los manuales y que 
cumple el mismo cometido. 
Se trata de RUN«nomprog», 
que no es otra cosa que una 
variante de LOAD«nom- 
p.»,r. Es decir: estas dos ins- 
trucciones sirven exactamen- 
te para lo mismo; para que 
un programa grabado en 
formato ASCII se autoe- 
jecute. 

En cuanto al sobreimpresio- 
nador de imagen en video, 
existe para la segunda gene- 
ración de MSX, hay diversos 
modelos de MSX2 de varios 
fabricantes que lo llevan in- 
corporado. También el Pio- 
neer incorpora un super im- 
presor. 
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Tablón de anuncios 




Esta sección de MSX CLUB es de nuestros lectores. Todos ellos tienen derecho a dos inserciones totalmente gratuitas. Las 
características de esta sección no permiten la inclusión de anuncios con fines de lucro. Advertimos que la desprotección y 
copia de software original es un acto delictivo perseguido por la f 



Compro Ampliación de 16 K o 64 
K por 4.000 ptas. más 60 juegos a 
can., entre ellos: yier Ar Kunfu I 
y II, Trac & Field I y II, Atletic 
Land y Circus Charlie. Gonzalo 
Márquez Benitez, c/Ntra. Sra. 
Merced S/N (CP. Aljoxani) - Tel. 
25 83 48. CP1. 

Contacto con usuarios del MSX 
para formar un club. José C. de la 
Fuente. c/Gran Capitán 3-5,2' 
Derch. Salamanca. CPi. 
Vendo Hit Bit HB-55P con am- 
pliación de memoria a 32K y 30 
megos comerciales y manuales. 
Todo por 30.000. Luis Marcos Gi- 
ménez. C/Diputación n" 5-8.°. Silla 
(Valencia). Tel. (96) 120 21 58. 
CPI. 

Intercambio instrucciones de 
programas: juegos, gestión y edu- 
cativos. Miguel A. M. Emaldi. 
C/Labairu N" 1 1 -2", izq. Baracaldo. 
48902. VIZCAYA. CPI. 
Vendo ordenador Sony HB 55 P 
en impecable estado, precio a con- 
venir. Juan Gómez. Tel. 388 89 
08. BARCELONA. CPI. 
Vendo 20 juegos MSX: Hiper 
Sports 1, Yie Ar Kung Fu 1, Night 
Shade, Elidor Soccer, etc. por sólo 
5.000 ptas. Juan Enrique Forcada. 
c/La Carrera n.° 2,5". Burriana 
(Castellón). CPI. 
Intercambio órgano Casio Tone 
MT -65 nuevo por ordenador 
MSX y también intercambio jue- 
gos. José Camboa. Tel. (93) 437 23 
65. CPI. 

Cambio manuales (referencia y 
usuario) MSX y juegos por am- 
pliación-monitor color 20 pulg. 

?or unidad de disco o impresora, 
ambién intercambio juegos en 
cinta o cart. Luis Abillira. Rial 
n.4 9. Poyo (Pontevedra). CPI. 
Vendo un ordenador Philips VG 
8.000 con cassette computore pro- 
gramas originales, libros y revis- 
tas. Todo 24.000 ptas. Alfonso 
Montoya. Tel. 43 16 17. Albox 
(ALMERIA). CPI. 
Vendo ordenador Sony HB-55P 
con ampliación de memoria de 
16K cartucho de Road Fighter y 
60 juegos de cintas por 25.000 
ptas. Juan Antonio Plaza Villar. 
c/Santa María, 6. Tel. (953) 77 600 
05. Torrcperogil. 23320 JAEN. 
CPI. 

Cambio cartucho YIE ARKUNG- 
FU II o 40 juegos originales por 
otro cartucho como BOXING o 
HIPER RALLY. MANOLO. 
Tel. (954) 63 21 94. CPI. 
Vendo Data Recorder COMPU- 
TONE en buen estado, poco uso 
por 5.000 ptas. Tiene led indica- 
dor, save, contador de vueltas, co- 
nector para micrófono, cascos y 
remote. También posee una entra- 
da estándar dim. Gonzalo Már- 
quez Benitez. C/Ntra. Sra. Mer- 
ced , s/n. (Aljoxani). Tel. 25 83 48. 
CPI. 



Compro manual de Logo PHI- 
LIPS en cartucho. GUSTAVO 
CELA. C/Poeta Cabanillas n.° 10, 
12 piso, 3" izq. 27004 LUGO. Tel. 
216793. CPI. 

Vendo 60 interesantes juegos en 
cartucho más COPY (2 por 4.000) 
o bien los cambio por: -cart. origi- 
nal (LOGO PHILIPS), -cart. de 
ampliación 16 o 64 K,-2 Joystick 
-cart. original (Champ) Micro By- 
te, -Libro consejos y trucos de 
DATA BECKER. Gonzalo Már- 
quez Benitez, C/Ntra. Sra. Mer- 
ced s/n. (CP. Aljoxani). CPI. 
Vendo Mitsubishi 80 K modelo 
ML- FK2 con 4 programas incor- 
porados en el ordenador Base de 
datos, Procesador de textos, Cál- 
culo electrónico, Creación de grá- 
ficos, con todo sus elementos y 
cinta de demostración. Regalo 
cassette de juegos de marca. Pre- 
cio a convenir. Preguntar por 
Yon. Tel. (943) 39 63 36. San Se- 
bastián. CPI. 

Cambio Mitsubishi MSX-MI- 
FXl con teclado numérico 80K 
RAm, con todos los elementos y 
16 juegos comerciales, más joys- 
tick mas Data -cassette por un 
PHILIPS, o por un HIT -BIT, o 
bien por un DINADATA que 
tenga la misma memoria. Roberto 
López Rodríguez. c/Juan XXIII 
N" 1. 27500 Chantada. LUGO. 
Tel. (982) 44 00 10. CPI. 



A LOS 

ANUNCIANTES 
DE ESTA 
SECCION 

Insistimos. El objetivo 
de esta sección es el de 
comunicar a nuestros 
lectores entre sí, pero 
no hacer publicidad 
metódica y gratuita de 
quienes se valen de la 
buena fe de esta redac- 
ción. A raíz de nume- 
rosas cartas recibidas 
denunciando un co- 
mercio subterráneo de 
cintas de juegos copia- 
das ¡legalmente, nos ve- 
mos obligados a no pu- 
blicar aquellos anun- 
cios que no especifiquen 
claramente qué se ofre- 
ce y qué se requiere pa- 
ra efectuar los inter- 
cambios. 



Cambio (DIP METER LEADER 
LDM 815) porSpectrum 48K. Re- 
galaría ordenador Ohio Scientific 
CPU 6502. -Luis. Apart. Ul-Es- 
parraguera CP 08080. CPI. 
Vendo cartucho Soccer por 3.000 
ptas. Floren González Fuentes. 
C/Alto Alday. N" 1-4' Izqda. 
48500. San Salvador del Valle (Bis- 
kaia). CPI. 

Vendo ordenador Hit Bit Sony 
55P y regalo dos cartuchos de 
juegos y dos manuales. Todo en 
perfectas condiciones por sólo 
20.000 ptas. Andrés Sánchez Bo- 
nilla c/Martín de Gainza 15, 
41005 Sevilla - Tel. (954) 
65 53 47. CP2. 

Vendo módulo de ajedrez y car- 
tucho c/tablero y fichas para vi- 
deo-juegos Philips, un adaptador 
de tarjetas Bee Card c/jgo. adjun- 
to y 2 cart., 10 jgos. en cinta y 
más de 30 revistas MSX. Precio 
de cada cosa a convenir. Gonzalo 
Uncillac/San Francisco 13, 3" Du- 
rango (Vizcaya) Tel. 681 15 21. 
CP2. 

Cambio programas originales. 
Poseo Chess 86, Backgammon, 
Time Bandits, etc. por The way 
of the tiger, Gunfright, Ghost- 
buster y otros originales. Enri- 
que Conejero Jarque c/Ancha 12, 
10600 Plasencia (Cáceres) CP2. 
Vendo radio cassette stereo c/do- 
ble pletina y salida auriculares. 
Toma de micrófono aux. p/mez- 
cla de grabac, Botón high speed 
dubbling, AM/FM, toma 9 vol- 
tios. Precio 14.500 ptas. Oscar 
Guillen. e/Enrique Salas, Arche- 
na (Murcia). CP2. 
Compro ordenador, monitor, 
unidad de discos, grabadora cas- 
sette, joysticks MSX, nuevos o 
usados. A. Dávila Apdo. 274 
45600 Talavera de la Rema (Tole- 
do). CP2. 

Busco curso de inglés para MSX. 
Carlos Martínez, c/Vizcaya 345, 
4" l 1 08027 Barcelona. CP2. 
Compro ampliación de memoria 
64K por 10.000 ptas. Angel Ois 
c/Cardoneira 3 y 5 2" Centro 
15001 La Coruña. CP2. 
Contacto con otros usuarios y 
otros clubs MSX. Club Mala- 
gueño MSX Avda. Manuel Go- 
rria 42, 5" A. 29013 Málaga - Tel. 
26 61 18. CP2. 

Vendo ordenador Dynadata 
DPC-200 de 80K c/200 progra- 
mas comerciales, revistas, etc. por 
50.000 ptas. Luis A. de la Fuente 
c/Gran Capitán 3-5 2" D. 37005 
Salamanca. CP2. 

Contacto c/usuarios MSX p/in- 
tercambio de programas e ideas. 
Principalmente de Toledo. Emilio 
Matamala Ortega. c/Martínez Si- 
mancas, 14, 2" Izq. 45005 Toledo. 
Tel. (925) 22 17 96. CP2. 
Intercambio 3 cartuchos Konami 
(Yie ar Kung fu 2, Soccer y Athe- 



tic Land) por cartucho amplia- 
ción de 64K. Alfonso Castro, P° 
Txingurri 4, 6 o D Herrera (San Se- 
bastián). Tel. (943) 39 14 24. CP2. 
Vendo Sony HB101P, garantiza- 
do, c/Libros de instrucciones, 
curso de Basic, en vídeo Beta jue- 
gos y listados de revista en casset- 
te. Todo por 40.000 ptas. Jorge 
Fernández Guerrero, c/Reina 
Victoria 4, 1" C Parla (Madrid) 

Compro cartucho de ampliación 
de 64K.. Miguel. Font deis Cape- 
llans Torre 6, 3" 1* Manresa (Bar- 
celona) - Tel. (93) 873 12 38. 
CP2. 

Intercambio programa de utili- 
dades y juegos, en Toledo y pro- 
vincias. Oscar López Pérez, 
Alberche 136, 4" A. Edif. Grana- 
da, Pol. Industrial Toledo 45007 - 
Tel. (925) 232 26 84. CP2. 
Intercambio programas apareci- 
dos en MSX CLUB y MSX EX- 
TRA. Enviar lista de los que te 
interesan. Colomina Sánchez, 
Enrique Piré García 42, 3 o JZ. El- 
che (Alicante). CP2. 
Intercambio programas. Envía- 
me tus programas en C.M. graba- 
dos en una cinta y te la devolveré 
con otros nuevos. Javier Cosco- 
lín, Ap. Correos 4034, Córdoba - 
Tel. 23 94 87. CP2. 
Contacto con usuarios unidad de 
disco de 3.5" Jordi 
ret, c/Bilbao ll,4°3'i 
resa - Tel. (93) 873 41 35. CP2. 
Vendo Philips VG8010 nuevo, 
impecable, sin tocar, c/manuales, 

S aramia y cables originales, lista- 
os de juegos, revistas MSX y 
cintas con más de 50 juegos. Todo 
29.980 ptas. Alberto Frías, Julián 
Gayarre 2, Castejón (Navarra). 
CP2. 

Intercambio tres juegos Yie ar 
Kungfu, Circus Charlie y Hero 
por Taekwondo o Boxing y Road 
Fighter. Luis Escudero García, 
Casablanca 11, Roquetas de Mar, 
Almería. CP2. 

Intercambio Yier Ar Kung Fu, 
Manic Miner, Blagger por otros 
de igual calidad. Club Ramsoft, 
Apdo. 33, 15960 Riveira (La Co- 
ruña). Tel (981) 87 10 78. CP2. 
Vendo Spectravideo SV-328, cas- 
sette y revistas por 40.000 ptas. 
Montse Sala. Tel. (93) 427 39 50. 
CP2. 

Intercambio más de sesenta jue- 
gos comerciales y cassette especial 
p/ordenador por unidad de disco 
3,5". Ramón Alonso c/Buenavis- 
ta 2B Ello. 4 J Monteada i Reixac 
(Barcelona). Tel. (93) 564 39 06. 
CP2. 

Intercambiamos juegos. Club 
Estemur Nueva San Antón, 29, 
3"C. 30009 Murcia. CP2. 
Vendo SVI 728 MSX, data casset- 
te, dos joysticks, revistas, manua- 
les en español e inglés, 8 juegos, 



un cartucho y libro basic. Todo 
en perfecto estado. 55.000 ptas. 
Roberto Acosta Jiménez, c/Salva- 
dor Manrique de Lara 32-9" C 
35010 Las Palmas de G.C. CP2. 
Vendo consola de videojuegos 
Philips, c/cartucho, prácticamen- 
te a estrenar por 6.000 ptas. Alicia 
Ager, c/Ronda del Carmen 35, 6" 
D. Cáceres 10.002. Tel (927) 
24 10 82. CP2. 

Intercambio programas con ami- 
gos de toda España. Envíame tu 
cinta y te la devuelvo con otros 
nuevos. Responderé a todos. Ja- 
vier Martín Cruz c/Poeta Gerar- 
do Diego 11, 1" Dcha. 39011 San- 
tander. Tel. (942) 33 09 16. CP2. 
Contacto con usuarios extranje- 
ros. Posibilidad de realizar pro- 
gramas conjuntamente. Intercam- 
bio de información, trucos, bi- 
bliografía, revistas, etc. A. Blanco 
Apdo. Correos 2168, 08200 Saba- 
dell (Barcelona). CP2. 
Intercambio Decathlon, Ghost- 
buster, Zaxxon, Pitfall II por Pa- 
norama para matar, Master of de 
Lamp, Grand National, etc. Igna- 
si Pony, Carretera de Cassernes, 
31 08680 Gironella (Barcelona) 
CP2. 

Vendo Toshiba HX10, cassette y 
cuatro programas. Todo en buen 
estado por 25.000 ptas. Alejandro 
de Julián Riera, Aragón 281, Pral. 
B 08009 Barcelona, Tel. (93) 
215 39 22. CP2. 

Vendo grabadora Sony TCM-2 
nueva, c/cable ordenador y un 
juego por 7.000. Contrarre- 
embolso. José A. Borrego c/Rei 
Martí L'Humá, 7. 17000-Girona. 
CP2. 

Intercambio programas MSX sin 
fines económicos. Enviar lista a 
José L. Vega. Pza. Salvador Riera 
/ Entio. y 08026 Barcelona. CP2. 
Cambio, compro, vendo progra- 
mas p/SVI 328. Miguel A. He- 
rraiz Diaz. c/Martínez Izquier- 
do 14, 28028 Madrid. CP2. 

Cambio todo tipo de programas 
en disco para el MSX.2 Antonio 
Millán San Emeterio c/Matía 44, 
4° dcha. 20008 San Sebastián - Tel. 
(943) 216 64 66, CP2. 
Intercambio juegos MSX por 
programas de aplicación. Emilio 
Sánchez Milla c/Minas 71, I o 
02650 Montealegre (Albacete). 
CP2. 

Compro cartuchos ROM p/Spec- 
trum Plus, de juegos, deportivos y 
de mesa. También de utilidades. 
Lázaro de Soto. Apdo. 300. 21080 
Huelva. CP2. 

Vendo urgente. Hit bit 55P, car- 
tucho ampliación HBM 16K, 13 
cartuchos de juego, 24 progra- 
mas, cables originales, 5 libros, 
calculadora sin estrenar. Todo 
por 50.000 ptas. C/grabadora cas- 
sette Computone 5.000 más. 
Oscar Guillen Pay c/Enrique Sa- 
las, Archena (Murcia). CP2. 
Vendo Spectravídeo SVI 328 
80K, cassette SVI 404, Quick shot 
I y V, 12 programas, gestión y 
juegos, fuente de aliment. y dos 
manuales. Todo en perf. estado 
por 45.000 ptas. negociables. Juan 
Muñoz Falcó c/Marino Blas de 



Lezo, 24, 5° Valencia, Tel. (96) 
371 53 79. CP2. 

Contacto c/usuarios Spectraví- 
deo 318/328 p/intercamb. progr. 
ideas trucos, etc. Feo. Javier 
Montero de la Cruz c/Oña 91, 7" 
2" 28050 Madrid, Tel. (91) 
201 75 76. CP2. 

Contacto c/usuarios MSX para 
formar un club. Juan Carlos Lo- 
rente. c/Ausona 82, Sabadell 
(Barcelona) Tel. (93) 716 25 83. 
CP2. 

Vendo Spectravídeo SV 328 c/ 
cassette, dos ioysticks, interface 
centronics p/impresora, progra- 
mas, cartuchos, libros y manua- 
les, mapa de memoria. Completa- 
mente nuevo a 45.000 ptas. José 
M 1 Sánchez Benito c/Sebastián 
Elcano 23, 1" A, 33400 La Luz 
Aviles (Asturias) Tel. (985) 
57 45 14. CP2. 

Cambio jgo. Decathlon de Acti- 
vision con instrucciones por algu- 
no de los sgtes. jgos.: Super 
Chew, Tenis, Le Mans, H.E.R.O. 
Pin Ball o Fútbol. Daniel soto el 
Pedro II, 16, 1" 2' 07007 Palma de 
Mallorca. Tel. 41 58 60. CP2. 
Busco ampliación de 64K p/MSX. 
A ser posible intercambio por jgo. 
y can. Santiago Cordón c/Tiro 
6-8 2" 3', 08035 Barcelona. CP2. 
Vendo ampliación de 16K p/ 
MSX. Santiago Cordón c/Tiro 
6-8, 2" 3", 08035 Barcelona. CP2. 
Vendo Booga Boo original por 
1.900 ptas. o cambio por Knight 
Lore. Roberto López Rodríguez 
c/Juan XXIII, 1, Chantada (Lu- 
go). Tel (982) 44 00 10 (21 a 23 
hs.) CP2. 

Intercambio juegos por otros, 
como Circus Charlie, Comman- 
do, Night Shade, Gungfright, etc. 
Oscar Abeijón, Plaza Compostel 
7, 2" A. Riveira (La Coruña). CP2. 
Contacto c/usuarios de Baracal- 
do. Poseo un MSX y deseo inter- 
cambio de juegos e ideas. José 
Miguel. Llamar al 438 32 22 (La- 
borables 15 a 17 hs. CP2. 

Vendo Sony HB-P y cartucho de 
jgos, Battle Cross por 30.000 
ptas. y compro ampliación de 
memoria de 64K por 9.000 ptas. y 
cartucho de jgo. Angel V. Moli- 
nero c/Bolivia 56-58, Zaragoza. 
Tel. (976) 31 46 22. CP2. 
Intercambio jgo. Le Mans 48K 
c/instrucciones en castell. por al- 
guno de los sgtes.: Knight Lore, 
Alien 8 o Gunfright. Siró Garrido 
Padró c/Mogakoa D 10" Izqda. 
Portugalete (Vizcaya) Tel. 
461 16 14. CP2. 

Cambio Quickshot IX MSX joy- 
ball SVI sin estrenar por progra- 
mas MSX A. Morillas Avda. Luis 
More Castillo, 33A 1" 2' 08840 
Viladecans (Barcelona). CP2. 
Vendo Spectravídeo 728 más 
procesador de texto y base de da- 
tos, todo en perf. estado, sólo 
29.000 ptas. Miguel. Tel. (945) 
24 49 28 (tardes). CP2. 
Cambio 216 programas de revis- 
tas MSX por cartucho de amplia- 
ción de memoria 64K. José V. 
Planells Alagarda, c/Jesús Mo- 
rante Borrás 211, 46012 La Punta 
(Valencia). CP2. 




¡Haz saltar la pulga hasta 
lo más alto y podras ganar 
hasta 125.000 pts. en pre- 
mios! 

MSX CLUB DE PRO- 
GRAMAS y MIND GA- 
MES ESPAÑA, S.A. te des- 
afían a que juegues con Boo- 
ga Boo y ganes. Booga Boo 
es una simpática pulga salta- 
rina que cierto día cae a las 
profundidades de una cueva 
Habitada por un peligroso 
dragón y plantas carnívoras. 
Tú, no solo tienes que sor- 
tear estos obstáculos, sino 
llevar a Booga Boo a la su- 
perficie superando los 80 ni- 
veles de que consta el juego 
y logrando la máxima pun- 
tuación. ¿Te animas? 

Bases 

1. Para participar remítenos: 

a) Una fotografía de la últi- 
ma pantalla de Booga Boo. 

b) Una fotografía del ta- 
blero de puntuación con tu 
nombre en el primer lugar. 

c) Al dorso de ambas fotos 
coloca tu nombre, direc- 
ción, teléfono y el número 
de referencia de Mind Ga- 
mes España, S.A., editor 
autorizado de Booga Boo 
en versión MSX para Es- 
paña, cjue figura en la cará- 
tula original. 

2. El ganador será el que 
obtenga mayor puntuación. 

3. En caso de haber más de un 
concursante con la máxima 
puntuación, el ganador se 
sorteará entre ellos. 

4. El premio al ganador con- 
sistirá en 125.000 pts. en 
software de Mind Games 
España S.A. y material di- 
dáctico de informática MSX. 
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5. Todos los concursantes re- 
cibirán un regalo por su 
participación. 

6. El concurso caduca el día 
30 de noviembre de 1986. 

7. Quedan excluidos de parti- 
cipar en este concurso los 
empleados, agentes y fami- 
liares de los mismos de Quick- 
silva Ltd., Argus Specialist 
Publications, Alabaster Pass- 
more & Sons, Mind Games 
España, S.A., Ivex Films, 
S.A. y Manhattan Transfer, 
S.A. 

8. La participación implica la 
aceptación de las presentes 
regías. 

9. Las decisiones de MSX 
CLUB DE PROGRAMAS 
serán inapelables y no se 
mantendrá corresponden- 
cia con los concursantes. 

10. Remite el sobre a: 

MSX CLUB DE 
PROGRAMAS 
CONCURSO 
BOOGA BOO 
Roca i Batlle 10-12 
Barcelona 08023 



¡¡GANA 125.000 pts.!! 



— 



MSX por dentro 



iPor Joaquín López 



En torno a los SPRITES (III) 








La tercera parte de este artículo 
versa sobre un tema que levanta 
bastantes inquietudes entre los 
lectores: las colisiones. 
Llegar a saber qué figuras han 
chocado y, por extensión, dónde 
se ha producido el choque es el 
objetivo de esta tercera entrega. 



COLISIONES 

Como ya se dijo, sólo hay una 
forma de reconocer el número 
de plano de las figuras que cho- 
can: comprobar sus coordenadas. 

Supon por un momento que estás 
trabajando con SPRITES sencillos y sin 
ampliación. Estos habrán sido defini- 
dos en un cuadrado de 8x8 pixels. 
Cuando se produzca un choque entre 
dos figuras, la ejecución de programa se 
detendrá y hará un salto a la subrutina 
de la línea indicada por la instrucción 
ON SPRITE GOSUB xx. En ese ins- 
tante podrás tener la certeza (o casi) de 
que dos SPRITES han colisionado. 
Ahora bien, como el VDP de los MSX 
de la primera generación no se halla ca- 
pacitado para distinguir el número de 
plano de las figuras en contacto ni la 
posición de éstas en la pantalla, deberás 
comprobar una a una todas las coorde- 
nadas de los SPRITES en curso y veri- 
ficar si otra figura está lo suficiente- 
mente próxima como para justificar un 
choque. Pero, ¿cuán próximas deben 
estar dos figuras móviles para que coli- 
sionen? La respuesta es sencilla. Se 
considera como principio de coordena- 
das de los SPRITES el vértice superior 
izquierdo de los mismos. Por consi- 
guiente, para que dos figuras entren en 
contacto, tanto el valor de las coorde- 
nadas horizontales como el de las verti- 
cales de ambas deben diferir, como má- 
ximo, en siete puntos. Esto, natural- 
mente, está referido a figuras de 8x8 
pixel; para figuras más grandes habrá 
que considerar una posible colisión 
cuando sus coordenadas difieran en el 
tamaño del lado menos uno. 

UNA RUTINA PARA SABER 
LOS PLANOS 

La pequeña rutina que sigue te permiti- 
rá saber los planos de las figuras en co- 
lisión. Debes llamarla desde la subruti- 
na indicada en ON SPRITE GOSUB. 
A la salida, devolverá el número de pla- 
nos de los SPRITES en contacto en las 
posiciones 
&H9FFF. 



Puede producirse un caso especial, que 
la rutina devuelva un cero en ambas di- 
recciones. Ello será debido a que el sis- 
tema operativo emplea tiempo en reac- 
cionar a tus órdenes y es posible que el 
VDP crea que hay dos SPRITES en co- 
lisión cuando en realidad uno de ellos 
ya ha sido borrado (asignando a su co- 
ordenada vertical el valor 209). Hay 
que tener presente que se produce una 
interrupción cada 1/50 segundos y, en- 
tre tanto, el microprocesador puede 
haber hecho muchas cosas (en realidad 
habrá realizado miles de instrucciones). 
Es preciso tener todo esto en cuenta, 
para que cuando la rutina dé el referido 
resultado no se tomen medidas en la 
creencia que el SPRITE cero ha coli- 
sionado. 

Aquí tienes su listado en ASSEM- 
BLER: 



LISTADO 1 



io bufnohb: 


EQU 


IAOO0 


20 planos: 


EQU 


•9FFE 


30 TAHANO: 


EQU 


I9FFD 


40 vopi: 


EQU 


IF3E0 


50 


0R6 


IA100 


60 


LO 


DE, BUFN0MB 


70 


PUSH 


DE 


80 


LD 


HL.6912 


90 


LD 


BC.256 


100 


CALL 


159 


110 


POP 


DE 


120 


LD 


IX, TAHANO 


130 


LD 


A.(VDPl) 


UO 


AND 


3 


150 


LO 


L,8 


160 


JR 


2, SALIDA 


170 


LD 


L,32 


160 


CP 


3 


190 


JR 


2, SALIDA 


200 


LD 


L,16 


210 SALIDA: 


LD 


A.L 


220 


LD 


(TAHANO) , A 


230 BUCLE: 


LD 


H.D 


240 


LD 


LE 


250 


LD 


A, (DE) 



260 


SUB 


208 


270 


JR 


Z,IN1 


280 


DEC 


A 


290 


JR 


Z.C0NT 


300 


ADD 


A, 241 


310 


LD 


G»A 


320 BUCLEl: 


INC 


L 


330 


INC 


L 


340 


INC 


L 


350 IN2: 


INC 


L 


360 


JR 


Z.CQNT 


370 


LD 


A, (HL) 


380 


SUB 


208 


390 


JR 


Z, BUCLEl 


400 


DEC 


A 


410 


JR 


Z, BUCLEl 


420 


ADD 


A.241 


430 


CALL RUT 


440 


JR 


COK 


450 


JR 


BUCLEl 


460 C0NT: 


INC 


E 


470 


INC 


E 


480 


INC 


E 


490 


INC 


E 


500 


JR 


NZ, BUCLE 


510 INI : 


LD 


HL,0 


520 


JR 


1N0 


530 ok: 


INC 


E 


540 


INC 


L 


550 


PUSH BC 


560 


LD 


C,(HL) 


570 


INC 


L 


580 


INC 


L 


590 


LD 


A, (HL) 


600 


CP 


16 


610 


JR 


C.0K1 


620 


LD 


A,C 


630 


SUB 


32 


640 


LD 


CA 


650 QKl: 


LD 


A, (DE) 


660 


INC 


E 


670 


INC 


E 


680 


PUSH AF 


690 


LD 


A, (DE) 


700 


CP 


16 


710 


JR 


C0K2 


720 


POP 


AF 


730 


SUB 


32 



740 


PUSH AF 


750 0K2: 


POP 


AF 


760 


CALI RUT 


770 


POP 


BC 


780 


JR 


C, ENCONT 


790 


OEC 


E 


800 


DEC 


E 


810 


DEC 


E 


820 


JR 


IN2 


830 encont: 


DEC 


L 


840 


DEC 


E 


850 


LO 


A, (DE) 


860 


LD 


H,(HL) 


870 


LO 


L,A 


880 INO: 


LD 


(PLANOS) ,H 


890 


RET 




900 ! 






910 ; 






920 ; 






930 RUT: 


SUB 


C 


940 


CP 


crx+o) 


950 


RET 


C 


960 


NEG 




970 


CP 


CIX+O) 




FUNCIONAMIENTO 
DE LA RUTINA 

La rutina está formada siguiendo el clá- 
sico algoritmo de la búsqueda binaria. 
Este sistema, que peca de lento cuando 
se trata de buscar a través de series lar- 
gas, resulta aquí tan útil como el que 
más, puesto que el número de SPRI- 
TES está limitado a 32. 
En síntesis, se trata de comparar las co- 
ordenadas del SPRITE cero con todos 
los demás. Si la posición vertical o la 
horizontal no indican una colisión, se 

f>asa a comprobar el SPRITE uno con 
os siguientes, etc. Como veis, el núme- 
ro máximo de ciclos de búsqueda será 
de 31*(31 + l)/2, es decir, 496. El tiem- 
po total empleado por la rutina oscila 
entre algo más de 100 milisegundos, en 
el peor de los casos (si han colisionado 
los SPRITES 30 y 31), y algo menos de 
10 milisegundos, si ha chocado el 
SPRITE con otra figura. Todo esto 
resalta la conveniencia de construir un 
programa de forma que los SPRITES 
susceptibles de chocar con mayor faci- 
lidad ocupen los primeros números de 
plano, ya que la rutina completará el 
trabajo como mayor rapidez. 
Lo primero que hace la rutina es copiar 
el contenido de la tabla de atributos de 
los SPRITES en un BUFFER en la 
RAM de la CPU (líneas 60 a 1 10), a fin 
de acceder al VDP de un solo paso. En 
el caso de que queráis cambiar la ubica- 
ción de la rutina, con la ayuda de un 
ensamblador, deberéis tener en cuenta 



ue ésta funciona sólo si la dirección 
el BUFFER es múltiplo exacto de 
256, de suerte que sea fácil comprobar 
si se ha llegado al final de la tabla, mi- 
rando si el byte bajo de los punteros 
(DE y HL) es cero. 
Por otro lado, la rutina funciona in- 
dependientemente del tipo de SPRITE 
empleado. Las líneas 130 a 220 sirven 
para identificar este tipo y poner el ta- 
maño en una posición de memoria, a 
fin de que la rutina que compara las 
coordenadas (RUT, líneas 930 a 980) 
sepa el valor a restar. 
A continuación se incluye el cargador 
de líneas DATA. Es interesante que 
respetéis los números de línea del mis- 
mo. Para comprobar su funcionamien- 
to, teclead en modo directo: 
RUN 420. 

Si todo va bien el programa se detendrá 
con un error del tipo: RETURN wit- 
hout GOSUB. 



LISTADO 2 



10 G0SUB420:' LANZAMIENTO RUTINA 
420 1 

430 1 PROGRAMA CARGADOR 
440 1 

450 F0RX=4HAl00TQiHA19l:READV$ 
460 POKEX , VALC "&H"+V$) : S=S+PEEK( X) 
470 NEXT 

480 I F S 14709T HENBEEP : CLS : PR I NT " HA Y UN 
ERROR" : END 
490 RETURN 

500 DATA11,00,A0,D5,21,00,1B, 01,00, 01,0 

D, 59,00,D1,0D,21,FD,9F,3A,E0,F3,E6,03,2 

E, 08, 28, 08, 2E, 20, FE, 03, 28,02, 2E, 10,70,3 
2,FD,9F,62,6B,1A,D6,D0,28,23,3D,28,1A,C 
6,F1,4F,2C,2C,2C,2C,28,11,7E,D6,00,28,F 
5 30 28 

510 DATAF2,C6,F1,CD,87,A1,38,00, 18, E9.1 

0. 10.10.10.20.06.21.00.00.18.20.10.20.0 
5,4E,2C,2C,7E,FE,10,38,04,79,D6,20,4F,1 
A, 10, 10, F5,1A,FE, 10, 38, 04, Fl ,06,20, FS,F 

1, CD,87,A1,C1,38,05,1D,1D,10,18,B9,2D,1 
D,1A,66 

520 DATA6F,22,FE,9F,09,91,DD,BE,00,D8,E 
0,44, 00, BE, 00, 09 

PROBANDO LA RUTINA 

El siguiente programa sirve para com- 
probar el funcionamiento de la rutina. 
Había construido algo más sencillo pa- 
ra el cometido, pero al final he optado 
por agregarle unas líneas y convertirlo 
en un juego (sin pretensiones). La cosa 
funciona así: 

Las líneas hasta la 130 sirven para asig- 
nar a todos los SPRITES un cuadradín 
de 8x8. La mayoría de éstos son de 



color amarillo, pero hay uno blanco (el 
móvil) y varios rojos. 
Las líneas 140 a 280 tienen como come- 
tido mover el cuadradín blanco a lo lar- 
go de todas la pantalla, comprobando 
que éste no salga de la pantalla. Para 
desplazarlo basta con utilizar las teclas 
del cursor o un joystick conectado al 
puerto uno. 

Las líneas a partir de la 290 conforman 
la subrutina de tratamiento de colisio- 
nes, llamando a la rutina en C.M. y bo- 
rrando el SPRITE con el que choque el 
cuadradín blanco. 

El funcionamiento del juego es muy 
simple. Al hacer RUN el cuadradín 
blanco empieza a moverse y ya no se 
puede detener. Si el cursor blanco coli- 
siona con un cuadradín amarillo, se lo 
«come» y éste último desaparece de la 
pantalla. Por contra, si el cursor blanco 
toca a un cuadradín rojo, el juego fina- 
liza, así como si se roza cualquiera de 
los bordes de la pantalla. El problema 
es que cada vez que nos «zampamos» 
un cuadradín amarillo la velocidad del 
cursor aumenta y es más difícil contro- 
larlo. En fin, como veis, el objetivo es 
acabar con todos los cuadradines ama- 
rillos, aunque particularmente yo no lo 
he conseguido. 



1STADO 



20 ' 

30 ' DEH0 
40 ' 

50 SCREEN1 : KEY0FF: COLORIS, 1 , 4 

60 K:EY1,"SCREEN0'+CHR*(13) 

70 DEFUSR=4HA100:V=1.8 

80 0NSPRITE80SUB290 

90 F0RX=0T07:A$=A$+CHR$(255):NEXT 

100 F0RZ=0T03i:SPRITE$(Z)=A$ 

110 X=X+8:Y=RND(Z)*185 

120 PUTSPRITEZ,(X,Y),ll+5*(Z/4=INTíZ/4) 

) 

130 NEXT 

140 X=124:Y=88 

150 PUTSPRITE0,(X,Y),15 

160 SPRITE0N 

170 IFX>2470RX<0QRY<-1QRYM83THEN410 
180 A=STICK(0):B=STICKÜ):A=A+B:IFA=0TH 
ENA=A1 
190 A1=A 

200 0NAG0T02 1 , 220 , 230 , 240 , 250 , 260 , 270 , 
280 

210 Y=Y-V:60T0150 

220 Y=Y-V:X=X+V:G0T0150 

230 X=X+V:60T0150 

240 Y=Y+V:X=X+V:GQT0150 

250 Y=Y+V:6QT0150 

260 Y=Y+V:X=X-V:60T0150 

270 X=X-V:6QT0150 

280 x=x-v:y=y-v::gotoi50 
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DE MAILING 



¡NOS APLICAMOS A SER UTILES! 

A TRAVES DE MSX CLUB DE MAI1INC PUEDES ADQUIRIR 



BASICTUTORIDEALpCIC 

ugBtiíSS 



ADAPTADORES TARJETAS] 
INTELIGENTES 
BEE CARD Y SOFTCARD 




Deja el manual de lado. Inserta este breviario de 
BASIC en cartucho y olvídate. No ocupa memoria. 

PVP 3.500 pts. 



No te quedes al margen y disfruta de las tarjetas 
Inteligentes. Lo último en soft. PVP 2.850 pts. 



í 



ENVIA HOY MISMO ESTE CUPON 



Nombre y apellidos 



I Dirección 

I Población CP Prov Tel 

I □ Tutor Basic Ras. 3.500- □ Adaptador Bee Card Ras. 2.850,- □ Adaptador Softcard Ras. 2.850- 
| Gastos de envío por cada producto 1 00,- pts. 

| Remito talón bancario de pts. a la orden de Manhattan Transfer, S.A. 

^Enviar a MSX CLUB DE MAILING, Roca i Batlle 10-12 bajos - 08023 Barcelona. 



MSX por dentro 





290 SPRITEOFF 

300 Z=USR(0) 

310 Sl=PEEK(iH9FFE) 

320 S2=PEEK(iH9FFF) 

330 IFS1+S2=0THEN360 

340 PUTSPRITES2, (0,209) 

350 IFS2/4=INT(S2/4)THEN410 

360 PLflVG" 

370 V=V+.4:0K=0K+1 

380 IF0K=24THEN400 

390 SPRITEON: RETURN 

400 SCREENÜPRINT-PERFECTO" 

410 play-catarro-:end 

CONCLUSIONES 

El programa anterior está preparado 
para funcionar directamente con el car- 
gador de líneas DATA. A tal efecto, se 
ha previsto que los números de línea de 
ambos programas se complementen. 
El objetivo del programa que contiene 
el pequeño juego no es otro que servir 
de demostración al empleo de la rutina 
ASEEMBLER. Con ello he pretendido 
dejar entrever de qué forma tan simple 
puedes usar la referida rutina en cual- 
quiera de tus programas. Por cierto, si 
deseas saber además del número de pla- 
no de los SPRITES en colisión el lugar 
de la pantalla donde se ha producido 
ésta, debes empezar por conocer la for- 
ma en que se guardan los atributos de 
los SPRITES en la VRAM. La tabla de 
atributos empieza en la dirección 6912 
(tanto en SCREEN 1 como en SCRE- 
EN 2). La longitud total es de 256 by- 
tes y cada figura emplea cuatro bytes, 
distribuidos así: 



Byte 1-Coordenada vertical 

2- Coordenada horizontal 

3- Número de plano 

4- Color 

Tanto la coordenada vertical como la 
horizontal admiten valores negativos 
(hasta —31). En el primer caso esto se 
consigue empleando la notación en 
complemento a dos, esto es, 255 para 
-i, 254 para -2, etc. En el segundo 
caso se recurre a un ingenioso artificio 
que consiste en emplear el bit siete del 
byte dedicado al color como señal de 
que el SPRITE debe ser situado 32 pi- 
xels a la izquierda. Así, si se desea po- 
ner una figura en la posición horizontal 
— 1, el sistema colocará un 31 en el ter- 
cer byte y pondrá el séptimo bit del 
byte del color a uno (31-32=-l). Este 
truco es posible debido a que bastan 
cuatro bits para representar el código 
de cualquier color y los otros cuatro 
bits quedan libres. 

Con esta información, y sabiendo, gra- 
cias a la rutina, el número de patrón de 
los SPRITES en contacto, es sencillo 
deducir en qué coordenadas se obtie- 
nen gracias a unas líneas como éstas: 



LISTADO 4 



10 'COORDENADA VERTICAL 

20 Y=VPEEK(N0. PLAN0J4) 

30 IFY)224THENY=Y-256 

40 'COORDENADA HORIZONTAL 

SO X=VPEEK(N0. PLAN0*4+1) 

60 IFVPEEKÍN0. PLANM4+2K15THENX=X-32 

Sólo una cosa más: por conveniencia, la 
rutina coloca el SPRITE con menor 



número de plano en primer lugar (en la 
posición &H9FFE). 



LIMITACIONES 

Es evidente que una rutina tan corta 
(menos de 250 bytes) debe tener limita- 
ciones. La más importante es el hecho 
de que no se toma en consideración la 
forma de las figuras. En efecto, es per- 
fectamente posible que dos figuras es- 
tén muy próximas y no tengan ningún 
punto coincidente y, de forma contra- 
ria, dos SPRITES pueden estar en con- 
tacto a través de un único pixel y en- 
contrarse relativamente alejados. De 
cualquier manera, la rutina busca figura 
tras figura hasta encontrar dos que 
pueden estar en contacto, atendiendo a 
sus coordenadas. Cuando se produce 
este hecho, la rutina interrumpe la bús- 
queda y vuelve al BASIC. Por tanto, es 
posible que se dé el caso de que los pla- 
nos devueltos no correspondan con los 
SPRITES en colisión, aunque, a decir 
verdad, esto sólo se producirá si el pro- 
grama con el que funciona la rutina 
contiene SPRITES poco rellenos y hay 
varias figuras que se mueven con posi- 
bilidades de colisionar. 
Es fácil, empero, ampliar la rutina para 
protegerse de los inconvenientes cita- 
dos anteriormente. Tras comprobar 
que las respectivas coordenadas X e Y 
de las figuras hacen posible el contacto, 
la rutina salta a la etiqueta «EN- 
CONT». Si a partir de ahí se miran los 
patrones, es relativamente sencillo de- 
terminar si verdaderamente tienen, al 
menos, un punto en común. 
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MSX 

AMSTRAD 

SPECTRUM 



MOLECULE MAN 

Perdido en un laberinto de 
256 habitaciones lucha en con- 
tra del tiempo y las radiaciones 
letales para teleportarte a 
lugar seguro. También incluido 
en esta cinta un único y fácil 
de utilizar, sistema de constru- 
cción de laberintos, que te 
permitirá corregir el existente 
o crear otros nuevos. 

MSX 

COMMODORE 




SPEED KING 

El juego de carreras de Moto- 
. cicletas" con la-emocionante 
acción de correr rueda con 
i rueda contra otros 19 pilotos 
[Ponte el casco y vive la inol- 
vidable aventura de las motos 
de ditas prestaciones compi- 
tiendo a 250 millas a la hora! 



MSX 
AMSTRAD 
SPECTRUM 




KNIGHT TYME 

La tercera de la serie de aven- 
turas Magic Knight, se encon- 
tró a sí mismo transportado 
al siglo 25 abordo de la nave 
estelar PISCIS. El juego utili- 
za un sistema mejorado de 
animación, que fue utilizado 
por primera vez en Spellbound. 
¿Será éste el fin de Magic 
Knight?. 

SERIE M.A.D.: P.V.P. 1.100 PTAS. 



MSX 
AMSTRAD 
SPECTRUM 




FORMULA 1 

El juego de competición de 
mayor realismo, con los diez 
circuitos mas famosos, 
SILVERSTONE, MONACO, 
MONZA... etc. 

¡3, 2, 1... Adelante! 





CHILLER 

En una fría noche de Luna llena 
intentarás salvar a tu chica 
enfrentándote a cadáveres 
vivientes, arañas, espectros 
y murciélagos. 
¡Animo y recoge todas las 
cruces que puedas! 




SPACE WALK 

Eres un astronauta al mando 
de la Lanzadora Espacial. 
Desde tu base en la luna vigilas 
los satélites, descarriados y 
tienes que recuperarlos. Tra- 
baja por la superficie de la luna 
y cuando sea necesario utiliza 
el JET-PACK para propulsarte 
al satélite. 

Licencia exclusiva para ESPAÑA ORO SOFT 
Fundadores, 3 28028 MADRID 
Tek. 255 45 00/09 



Por José A. Valera™ 




10 REH mt» JUE60 DE LA BRISCA ttttt 
20 SCREEN3: COLOR 13, 4. 4: DPEN"6RP: "ASil 
30 PSET(35,80):PRINTI1, -BRISCA" 
40 PLAY"o514arbcdrad" 
50 FOR T=l TO 2000: NEXT T 
70 SOSUB 1000: REH MUESTRA INSTRUCCIONES 
80 60SUB 1500: REH BARAJEO CARTAS 
90 COLOR 15,l,l:CLS:LINE(210,40)-(255,54 
) f 4,BF:LINE'210,10)-(250.30),6,BF:LINE<2 
10,170)-(250,190),6,BF:LINE(214,14)-(245 
,26U,BF:LINE(214, 174)-(245,1B6),1,BF 
100 REM tttt PR06AHA PRINCIPAL Wl 
110 X=1:F0R Q=l TO 5 STEP 2 
120 Al (X)=A(Q):B1 ( X > =B (Q ) : A2 ( X ) =A (Q+l ) :B 
2(X)=B(Q+1) 

130 SOSUB 2000: REM PINTA PARTE TRASERA D 
E LA CARTA DEL ORDENADOR 
140 N=A2(X):P=B2(X) ¡GOSUB 3000:REH PINTA 
CARTA JUGADOR 
150 X=X+1:NEXT Q:X=0 
170 X2=210:Y2=55:N=A(36):P=B(36):6OSUB 4 
000: REM DIBUJA CARTA MUESTRA 
180 IF B=0 THEN60SUB 10000 ¡GOSUB 11000: 
GOTO 200: REM PRIMERA TIRADA 
190 GOSUB 11000:GOSUB 10000:REM PRIMERA 
TIRADA 

200 GOSUB 5000: REM HALLA GUIEN GANA 

210 FOR 0=7 TO 35 STEP 2 

220 IF B=l THEN A1(J)=A(Q):B1(J)=B(Q):A2 

( I ) =A (Q+l ) : B2 ( I ) =B (Q+l ) : GOSUB 2000: N=A2 ( 

I):P=B2(I) -.GOSUB 3000: GOTO 240 

230 A1!J)=A(Q+1):B1(J)=B(QM):A2(I)=A(0) 

:B2(I)=B(Q):N=A2(I):P=B2(I):50SUB 3000:6 

OSUB 2000; GOTO 250 

240 COLOR 4:PSET(210.45):PRINTIIl,"nH": 

PSET (220. 45) : COLOR 1 5: PRINTI 1 , 36-Q- 3 : GOS 

UB 11000:6OSUB 10000: GOTO 260 

250 COLOR 4:PSET(210,45):PRINTtl, H Hll": 

PSET ( 220, 45 ) : COLOR 15: PRINT#1 , 36-Q- 1 : GOS 

UB 10000:GOSUB 11000 

260 GOSUB 5000: REM HALLA QUIEN GANA 

300 NEXT Q 

310 FOP H=l TO 2 

320 IF B=0 THENGOSUB 10000: GOSUB 11000:6 
OTO 340 

330 GOSUB 11000:GOSUB 10000:REM PRIMERA 
TIRADA 



340 GOSUB 5000: PEM HALLA QUIEN GANA 
350 NEXT H 

360 FOP T=l TO 1000:NEXT T 

370 COLOR 15,4,4:CLS:PSET(50,80) 

380 IF P2>P1 THEN PP.INT*1.»NE HAS GANADO 

, ;P2;'A , ;P1:G0T0 400 

390 IF P1>P2 THEN PRINTM.'TE HE SANADO. 
P0R";P1;'A , ;P2:60T0 400 
395 IF P1=P2 THEN PRINTI1, "HEMOS EMPATAD 
O A:";P2 

400 FOR T=l TO 3000: NEXT 

405 CLS:PSET(20, 100) :PRINTI1, "QUIERES SE 

6UIR JUGANDO [S/N]" 

410 AI=INKEY$:IF A$=" THEN 410 

420 IF A$="S" OR A$='s" THEN RUN 80 

430 IF A$="N" OR A$=V THEN END 

440 GOTO 410 

1000 REM SUBRUTINA QUE MUESTRA INSTRUCCI 
ONES 

1010 SCREEN 0:KEY OFF:COLOR 1,7,7:HIDTH 
36 

1020 LOCATE 4,0:PRINT" — I N S T R U C C 

I O N E S— "¡LOCATE 4,2 
1025 LOCATE 4,2:PRINT"ESTE ES EL POPULAR 

JUEGO DE LA BRISCA, Y TENDRAS QUE ENFR 
ENTARTE AL ORDENADOR. EL MARCADOR DE A 
RRIBA INDICA LOS PUNTOS QUE LLEVA EL ORD 



Estamos ante un magnífico progra- 
ma que simula el popular juego de la 
brisca, en el que se destaca el excelente 
grafismo y la correcta ejecución del 
juego en el que tienes que enfrentarte 
al ordenador. 



E-NADOR. EL DE ABAJO LOS QUE LLEVAS TU, 
Y EL DEL CENTRO LAS CARTAS QUE HAY EN LA 
BARAJA." 

1050 LOCATE 4.11:PF:INT"PAPA TIRAR UNA CA 
RTA TECLEA:' 

1055 LOCATE10, 13:PRINT"1-IZQUIERDA" 

1056 LOCATE!0.15:PRINT"2-CENTRO" 

1057 LOCATE lí, 17:PPINT"3-DERECHA" 
1070 LOCATE 9,20:PRINT" ! ! ! f SUERTE! ! f ! " 
1030 LOCATE 8,22:PPINT"PULSA UNA TECLA" 
1090 A$=INKEY$:IF A$="" THEN 1000 

1100 PETURN 

1500 PEM SUBRUTINA DE BARAJEO DE CARTAS 
1510 SCREEN 2:C0L0R 15,12. 12: CLS: CLOSE: 
PEN"grp:"AStl 
1515 U=RND(-TIHE) 

1520 PSET '20.80) :PRINT#1, "ESPERA UN MOME 
NTO POR FAVOR" 

1530 PSET (60, 120) :PRINT#1, "ESTOY BARAJAN 
DO" 

1540 DIM C(36),A(36),B(36) 
1550 FOR FM TO 36 
1560 W=INT(PND(l)t36)+l 
1570 FOR 671=1 TO FZ 
1580 IF C(GX)=H THEN 1560 
15"0 NEXT 67. 
1600 C(F7.)=W 



Programa 



1610 NEXT F7. 

1620 FOR T=l TO 36 

1630 READ Z,V 

1640 A(C(T))=Z:B(C(T))=V 

1650 NEXT: ERASE C 

1660 REM DATAS CARTAS, PRIMER NUMERO ES 
EL NUMERO DE LA CARTA. EL SEGUNDO ES EL 
PALO 

1670 DATA 1,1,1,2,1,3.1,4,3,1,3,2,3,3,3, 
4,4,1,4,2,4,3,4,4,5,1,5,2,5,3,5,4,6,1,6, 
2,6,3,6,4,7,1,7,2,7,3,7,4,10,1,10,2,10,3 
,10,4,11,1,11,2,11,3,11,4,12,1,12,2,12,3 
,12,4 

1680 PSET(40, 180) :PPINT#1, 'QUIERES TIRAR 
PRIHEROÍS-N) n :A$=INKEY$:IF A$=" M THEN 1 
680 

1685 IF A$="S" OR A$=V THEN B=0:GOTO 1 
700 

1690 B=l 
1700 RETURN 

2000 REM SUBRUTINA QUE MUESTRA LA CARA T 
RASERA DE LAS CARTAS DEL ORDENADOR 
2005 IF Q=35 THEN LINE(210,55)-(255. 135) 
.l.BF 

2010 IF X=l OP J=l THEN X1=0: Y1=0: GOTO 2 
500 

2020 IF X=2 OP J=2 THEN Xl=50: Y1=0:GOTO 
2500 

2030 X1=100:Y1=0 

2500 LINE(X1,Y1)-(X1+45.Y1+80),4.BF 
2510 FOR T=l TO 400:NEXT T 
2520 RETURN 

3000 REM SUBRUTINA QUE MUESTRA CARTA DEL 
JU6AD0R EN LAS COORDENADAS X2.Y2 
3005 IF Q=35 THEN LINE (210. 55) - (255, 135) 
.l.BF 

3010 IF X=l OR 1=1 THEN X2=0: Y2=i 10: GOTO 
3500 

3020 IF X=2 OP 1=2 THEN X2=50: Y2= 1 1 0: GOT 
O 3500 

3030 X2=100:Y2=U0 

3500 GOSUB 4000: REM DIBUJO CARTA 

3510 N=0:P=0: RETURN 

4000 REM SUBRUTINA QUE DIBUJA CARTA CON 
SUS PALOS EN LAS COORDENADS X2.Y2 
4010 LINE(X2,Y2)-(X2+45,Y2+B0U5.BF 
4020 LINE(X2+3.Y2*3)-(X2+42.Y2+77) . l.B 
4030 IF P=l THEN C$="r4f 116glr8f 1110dlrl 
0dlll0dlrl0dlll0ílr8gil6flr4»:COLOP 10:0 
=3:01=-2:G0T0 4070 

4040 IF P=2THENC$= u r8gll6flr4gll2f314e3" 

¡COLOR 6:O=0:O1=0:6OTO 4070 

4050 IF P=3 THEN C$="r 1 d 1 21 lu 1 2d?l 3r7 " : C 

OLOR 4: 0=4: 01=0: GOTO 4070 

4060 IF P=4 THEN C$="rlul41 Idl4u611u7r3d 

7":C0L0R 12:0=4:01=10 

4070 PEHmmDieujosmmmmt 



4080 ON NGOTO 4090. ,4150.4280.4340.4370, 
4410,,, 4440, 4480, 4520 

4090 REMtmmttAsmtmmttit 

4100 IF P=l THEN CIRCLEÍX2+23. Y2+40) ,13, 

10:PAINT(X2+30,Y2*40):RETURN 

4110 IF P=2 THEN PSETIX2+10, Y2+30) ¡DRAW" 

r24gl2f6112e6hl2":PAINT(X2+20,Y2+37):RET 

URN 

4120 IF P=3 THEN PSET(X2+19,Y2*15) ¡DRAW" 

e3f3d616u6":PAINT(X2+20,Y2+15),4:PSET(X2 

+17,Y2+32):DRAH"d30í5e5u30110":PAINT(X2+ 

19, Y2+35) : COLOR 6: PSET ( X2+12, Y2+23) : DRAW 

"r 20d81 20u8" : PAINT ( X2+ 15, Y2+26) , 6: RETURN 

4130 IF P=4 THEN LINEIX2+30, Y2+15)-(X2+1 

0.Y2+60) , 12:LINE(X2+34,Y2+15)-(X2+20,Y2+ 

70),12:CIRCLE(X2+15.Y2+65),7,12,2,6:LINE 

<X2+30.Y2+15)-(X2+34.Y2+15),12:PAINT(X2+ 

15,Y2+65),12 

4140 RETURN 

4150 REMmtmwREsmmmmt* 

4160 IF P=l THEN CI RCLE (X2+1B. Y2+20) ,B, 1 
0:PAINT(X2+20, Y2+20) . 10: CIRCLE ( X2+ 18, Y2+ 
60).8.10:PAINT(X2+18.Y2+60!:CIRCLE(X2+28 
,Y2M0) .8, 10:PAINT(X2+2B,Y2+40) ¡RETURN 
4170 IF P=2 THENC$= , rl6g8f418e4h8 n :PSET( 
X2M0, Y2+15) :DRAW C$: PAINT (X2+17, Y2*20) : 
PSET(X2+10,Y2+55):DRAWC$:PAINT(X2+17.Y2+ 
60 ) : PSET ( X2+20 . Y2+35) : DRAW C$: PAINT ( X2+2 
5.Y2+38) :RETURN 
4180 IF P=4 THEN 4240 
4190 T=1:G=0 

4200 COLOP 4:PSET(X2+11+G,Y2*15):DRAW"92 
f2d614u6":PAINT(X2+14+G,Y2+17),4:C0L0R 6 
: PSET ( X2+B+G, Y2+22) : DRAWr 10d41 10u4" : PAI 
NT (X2+9+G, Y2+24S 6: COLOR 4:PSET(X2+11+G, 
Y2+27):DRAWd38f2e2u3814 u :PAINT(X2+12+G. 
Y2+2B5.4 

4210 IF T=l THEN T=2:G=19:G0T0 4200 
4220 PSET (X2+23, Y2+67) : DRAW"e2u61 4d6í 2' : 
PAINT (X2+24.Y2+65) ¡COLOR 6: PSET ( X2+ 1 B , Y2 
+58) :DRAW"rl0u4! 10d4 : PAINT ( X2+1 ?. Y2+56) 
,6:C0L0R 4:PSET<X2+21, Y2+53) :DPAWu38e2f 
2d381 4 ": PAINT ( X2+22, Y2+50) . 4 : RETURN 
4240 T=1:G=0 

4250 LINE(X2+10+G.Y2+15)-(X2+8+6,Y2*60), 
12:LINE(X2+10+6.Y2+15)-(X2+13+6.Y2+15),1 
2:LINE(X2+13+6,Y2+15)-(X2+15+6,Y2+60),12 
:CIRCLE(X2+12+G.Y2+57),4,12,3,6:PAINT(X2 
+12+G.Y2*5B).12 

4260 IF T=l THEN T=2:G=21:G0T0 4250 
4270 LINE(X2+20.Y2+60)-(X2+18,Y2+17),12: 
LINEÍX2+20, Y2+60)-(X2+23,Y2+60),12:LINE( 
X2+23, Y2+60) - (X2+25, Y2+17) , 12: CIRCLE ( X2+ 
21,Y2+1B),4,12,,2.5:PAINT(X2+21,Y2+18),1 
2 

4275 RETURN 

4280 REMtmttmcuATRQttmmm 



4290 PSET(X2+10+O,Y2+15+Q1):DRAW C$ 
4300 PSET(X2+10+O,Y2+58+Ol):DRAH CI 
4310 PSET(X2+26+Q.Y2+15+01):DRAW C$ 
4320 PSET(X2+26+0.Y2+58+01) :DRAW C$ 
4330 RETURN 

4340 REMimmiCINCOtmmm* 

4350 PSET(X2+17+0.Y2+35+01):DRAW C$ 
4360 GOTO 4280 

4370 REMmmmsEismttmm 

4380 PSET(X2+10+O. Y2+37+01) :DRAH C$ 
4390 PSET(X2+25+0,Y2+37*01):DRAW C$ 
4400 GOTO 4280 

4410 REMttmttSIETEttmtmt 

4420 PSET ( X2+1B+0 , Y2*25+01 3 ¡DPAWCí 
4430 GOTO 4370 

4440 REHttmtmsoTAtmtmt 

4450 PSET(X2+10+O. Y2+10+O1) : DRAW C$ 
4460 GOSUB 4560: REM DIBUJA SOTA 
4470 RETURN 

4480 REMmmmtCABALLOimm 
4490 PSET < Y2+10+O1 ) : DRAW C$ 
4500 GOSUB 4640:PEM DIBUJA CABALLO 
4510 RETURN 

4520 REMtmmmPEYmmmm 

4530 PSET(X2+10+O.Y2+10+O1):DRAWC$ 
4540 GOSUB 4740: PEM DIBUJA PEY 
4550 RETURN 

4560 PEM SUBRUTINA QUE DIBUJA SOTA 
4570 PSET(X2+16.Y2+28).15:C0LQR 12: DRAH' 
dl0tldl0rl2ul0elül013ull7dll3":PAINT(X2* 
20.Y2+33U2 

4580 COLOR 6:PSET(X2+20.Y2+19):PPINT*1." 
B n 

45=>0 COLOP 4:PSET(X2+17,Y2+515:DRAW"r4d2 

0!6e3ul8":PAINT(X2+l ( >.Y2+55M 

4600 PSETÍX2+25. Y2+51) :DRAW"d20r6h3ul714 

":PAINT(X2+27,Y2+53),4 

4610 COLOP 7:PSET(X2+14.Y2+28):DPAWd20! 

3ul6e6":PAINT(X2+13,Y2+38),7 

PAINT (X2+33, Y2+33) ,7 
4630 RETURN 

4640 PEM SUBRUTINA QUE DIBUJA CABALLO 
4650 COLOR 6:PSET(X2+23,Y2M5):PRINT!1,* 
B* 

4660 COLOR12:PSET(X2+23,Y2+24):DRAH"d20r 

8u2013dl413ul413":PAINT(X2+25,Y2+40),12 

4670 COLOR 4:PSET(X2+31,Y2+44) :DRAW"g8d7 

1 5e2u7e5r5" : PAINT ( X2+26, Y2+46) , 4 

4680 COLOR 4:PSET(X2+10,Y2+35):DRA«"d2gl 

d2gld2gld2flrlelrle2u2r2dlrld3rld5h3g7f2 

e5Hrlflr3" 

4690 PSETÍX2+23, Y2+57) :DRAW M r2f Ir 2-f 2r ld5 
g2dlg2r3e3elu3elu3elu4hlu2hlllhlllhlir 
4700 PSET(X2+10.Y2+35):DRAW"u2f2elf2rlfl 
dlfldHlrlflrl" 

4710 PSET'.X2+26.Y2+60):DPAW n d4g4r3e6 u 
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4720 PSETÍX2+13, Y2+55) :DRAWd6r2u6" 
4730 RETUPN 

4740 REH SUBRUTINA QUE DIBUJA REY 

4750 COLOR 6 : PSET (X2+20, Y2+25) : PRINTI 1 , ' 

B" 

4760 COLOR 4:PSET(X2+20. Y2+24) :DRAW"r8u4 
g2h2g2h2d4":PAINT(X2+2!.Y2+23),4 
4770 PSET(X2+16,Y2+33) ,15: COLOR 7 :DRAK" 
d Í0f ldifr I2uí «elulflSai 1 7dil3" s PAINT (X2+ 
18, Y2+38) ,7 

4790 PSEKX2+14.Y2+33) :DPAW"g6f3e3u4 H :PA 
INTÍX2+1 1 , Y2+37) t 7 

4790 COLOR 2: PSETÍX2+11 . Y2+30) :DPAW"d40 
■ 

4800 PSET(X2+32.Y2+33) :DRAWí3dl513ul8": 
PAINTÍX2+33.Y2+35) 

4810 COLOR 4:PSET(X2*17,Y2+56):DRAH"r4di 

716e3ul4":PftINT(X2+l?. Y2+5B) 

4820 PSETÍX2+24.Y2+56) :DRAW"dl7r¿h3ul414 

":PA!NT(X2+26,Y2+58) 

4830 PETUPN 

5000 PEM SUBRUTINA QUE ANALIZA Y HALLA Q 
UIEN GANA UNA MANGA 

5020 IF A2(I)<>3 AND A2'.I)C1 AND AKJX 

>3 AND Al (J! OI THEN 5070 

5030 IF B2!I)=B1(J) THEN M2=A2(I) ¡M1=AK 

JklF M2<M1 THEN GOSUB 5200 ELSE GOSUB 5 

300 

5040 IF 82(I)=B(36! THEN GOSUB 5200 
5050 IF BKJ)=B(36) THEN GOSUB 5300 
5060 IF B=l THEN GOSUB 5300 ELSE GOSUB 5 
200 

5070 IF B2(I)=BKJ) THEN H2=A2(I) :M1=AK 
J):IF M2>M1 THEN GOSUB 5200 ELSE GOSUB 5 
300 

5090 IF 92(I)=B(36! THEN GOSUB 5200 
5090 IF Bl(J)=B(3¿i THEN GOSUB 5300 
5100 IF B=l THEN GOSUB 5300 ELSE GOSUB 5 
200 

5110 REF1 BORRADO DE CARTAS TIRADAS 
5120 FOR T=l TO1100:NEXT:LINE(155,13)-(2 
00,180),1,BF 

5125 IF Q=35 OR H>0 THEN A2(I)=0:B2(I)=0 

:AKJ)=0:B1(J)=0 

5130 RETURN 

5200 REH SUBRUTINA DONDE PONE MARCADOR D 
EL JUGADOR 

5210 GOSUB 5500: REH HALLA LOS PUNTOS OBT 
ENIDOS EN UNA TIRADA 

5220 P2=P2+PZ:PSET(217, 177) ¡COLORI :P 
RINTM, "IU" 

5230 PSET (210. 177) ¡COLOR 15: PRINTil , P2 
5240 B=0: RETURN 5110 
5300 REH SUBRUTINA QUE PONE MARCADOR DEL 
ORDENADOR 

5310 GOSUB 5500: REH HALLA LOS PUNTOS OBT 

ENIDOS EN UNA TIRADA 

5320 P1=PKPZ:PSET(217.17):C0L0P1 ¡PPIN 

Til,"»" 

5330 PSET f 210, 17) ¡COLOR 15 ¡PftlNTÜ.Pl 
5340 B=l; RETURN 5110 




5500 REH SUBRUTINA QUE HALLA LOS PUNTOS 
OBTENIDOS EN UNA TIRADA 
5510 PZ=0:PP=0:T=l:A=AlfJ):GOTO 5530 
5520 A=A2(I) 

5530 IF A=l THEN PP=ll:GOTO 5580 

5540 IF A=3 THEN PP=10:6OTO 5580 

5550 IF A=10 THEN PP=2:G0T0 5580 

5560 IF A=U THEN PP=3:G0T0 5580 

55^0 IF A=12 THEN PP=4 

5580 PZ=PZ+PP:IF T*l THEN T=2:PP=0:GOTO 

5520 

5590 RETURN 

10000 REH SUBRUTINA DE TIRADA DEL JUGADO 
R 

1001? PSET' 20, 90) ¡COLOR 14: PR INT# 1 , "ES T 
ü TURNO" 

10015 IF PLAY(0)=-1 THEN 10015 
10020 A$=INKEY$:IF A$="" THEN 10020 
10030 IF A$="l" OR A$="2" OR A$= M 3" THEN 

10040 ELSE 10020 
10040 I=VAL(A$):IF A2'IK>0 AND B2(I)<>0 

THEN 10044 ELSE 10020 

10044 COLOR1:PSET'20,90):FOR 1=1 TO 11:P 
RINT#1,CHR$Í 21*?) ¡ :NEXT TiPLAY'McJcegec 

10045 REH BORRA CARTA TIRADA 

10050 IF A*="l n THEN LINE (0, 1 10) - (45. 190 
),l,BF:GCTO 10080 

10060 IF A$="2" THEN LINE(50,110)-(95,19 
0),1,BF:GOTO 10080 
10070 LINE(100.110)-(145,190),1,BF 
1 0080 X2= 155 : Y2=97: I =VAL ( A$) : N=A2 ( I ) : P=B 
2(1) :GOSUB 4000:REM DIBUJA CARTA TIRADA 
EN COORDENADAS X2,Y2 
100"0 RETURN 

11000 PEH SUBRUTINA DE TIRADA DEL ORDENA 
DOR 

11010 PSET '20, "0): COLOR 14:PRINT#1, "ES M 
I TURNO" 

11015 FOR T=l TO1000:NEXT 

11020 IF B=0 THEN11 J70:REM «ira si tira 

el primero o segundo 

11030 FOR J=l TO 3 

110^0 if A1(J)>3 AND AKJX10 AND BKJX 

>B(36! THEN 11750 

11050 NEXT 

11060 FOR J=l TO 3 



11070 IF A1(J)>3 AND AKJX 10 THEN 11750 

11080 NEXT 

11090 FOR J=l TO 3 

11100 IF A1(J)>3 AND B1(JX>B(36)THEN 11 
750 

11110 NEXT J 
11120 FOR J=l TO 3 
11130 IF A1!J)>3 THEN 11 7 50 
11140 NEXT J 

11150 J=INT(RND(l)t3)+l:IF Ai(J)=0 THEN 
11150 

11160 GOTO 11750 

11170 REH EL ORDENADOR TIRA SEGUNDO 
11180 IF A2ÍIX4 OR A2(I)>9 THEN 11450 
tllW IF B2(I)=B¡36) THEN 11370 
11200 FOR 3=1 TO 3 

11210 IF B2(I)=B1(J) AND (A1(J)=3 OR Al( 

J)=l) THEN 11750 

11220 NEXT 

11230 FOP J=l TO 3 

11240 IF B2!I)=BlfJ) AND A1!J)>10 THEN 1 
1750 

11250 NEXT 

11260 FOR 3=1 TO 3 

11270 IF B1(JX>B!36) AND Bl(J)OB2(I) A 
ND AKJ)>3 AND AKJX10 THEN 11750 
11280 NEXT 
11290 FOR J=l TO 3 

11300 IF B1(J)=B2(I) AND A1(J)>3 AND Al( 

JXA2(I! THEN 11750 

11310 NEXT 

11320 FOR J=l TO 3 

11330 IF A1(J)>3 THEN 11750 

11340 NEXT 

11350 J=INT(RND(l)t3M:IF A1(J)=0 THEN 
11350 

11360 GOTO 11750 
11370 FOR J=l TO 3 

11380 IF A1(J)>3 AND AKJX10 AND BKJX 

>B(36) THEN 11750 

11390 NEXT 

11400 FOR J=l TO 3 

11410 IF A(J)>3 THEN 11750 

11420 NEXT 

11430 J=INT(RND(1)I3X1:IF AKJ)=0 THEN 
11430 

11440 GOTO 11750 

11450 IF B2(I)OB(36) THEN 11620 
11460 FOR 3=1 TO 3 

11470 IF A2(I)=3 AND A1(J)=1 AND B1(J)=B . 
(36) THEN 11750 

11480 IF A2(I)=l AND AKJ! >3 AND AKJXl 
THEN 11750 

11490 IF A2(I)=12 AND BKJ)=B!36) AND (Al 

(J)=l OR AKJ 5 =3! THEN 11751 

11500 IF A2(I)=11 AND B1(J!=B(36) AND (A 

KJ)=1 OR A1(J)=3 OR A1(J)=12) THEN 1175 



11510 IF A2(I)=10 AND B1(J)=B(36) AND (A 
KJ! = 1 CR AKJ)=3 OR A1(J)=12) THEN 1175 
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11520 
11530 
11540 
11550 
11560 
11571 
11580 
11590 
11590 
11600 
11620 
11630 
750 

11640 IF A2Ü)>1 
1(J) THEN 11750 

11650 IF A2(!)>3 AND AKJK4 AND B2(I)=B 
1(J) THEN 11750 

11660 IF A2(I)=12 AND AKJX4 AND B2(I)= 
BMJ) THEN 11750 

11670 IF A2(I) = U AND A1(J)=12 AND B2(I) 



NEXT 

F09 J=l TO 3 

IF A1(J)>3 AND AKJX10 THEN 11750 
NEXT 

POR J=l TO 3 

IF fllCJ) >3 THEN 11750 

NEXT 

J=INT(PND'1!*3^1:IF A1(J)=0 THEN 

60T0 11750 
FOR 3=1 TO 3 

IF ft2ií)=! AND B1(J)=B'36) THEN 11 



A1(J)=1 AND B2!I!=B 




=B1U) THEN 11750 

11680 IF A2(I!=10 AND(A1(J)=12 OR A1(J)= 
11> AND B2(I)=B1(J) THEN11750 



11690 NEXT 

11700 FOR J=l TO 3 

11710 IF B1(J)=B(36) THEN 11750 

11720 NEXT 

11730 J=INT(RNDC1)I3)+1:IF A1(J)=0 THEN 
11730 

11750 IF A1(J)=0 THEN J=INT(RND! 1) 13) +1: 
60T0 11750 

11755 COLOR 1:PSET(20.90):PRINT#1."U|II 
IBIBn":PLAY"14olcegec H 

11760 IF J=l THEN LINE(0.0)-(45,80! , 1 , BF 
:50T0 11800 

11770 IF J=2 THEN LINE (50,0) - (95. B0) , l.B 
F:S0T0 11800 

11780 LINE(100,0)-(145,B0),1,BF 

11790 REM DIBUJA CARTA TIRADA POR EL ORD 

ENADOR 

11800 N=A1(J):P=B1(J):X2=155:Y2=13:G0SUB 



UB10 RETURI 



Test de listado 



ibri 



nscai 



TEST DE LISTADOS. Para usar el Test de Listado que publicamos al final de cada programa debe cargarse el programa 
correspondiente publicado en nuestro número 7 del mes de noviembre, pág. 28. 



tf 


■ 1 


340 


-112 


1520 


- 34 


3000 


- 


4210 


-235 


4490 


-120 


4770 


-117 


5320 


- 23 


11015 


-116 


11290 


-186 


11570 


-149 


20 


-136 


350 


-203 


1530 


-151 


3005 


- 47 


4220 


-122 


4500 


-231 


4780 


- 53 


5330 


- 2 


11020 


-188 


11300 


-150 


11580 


-131 


30 


-244 


360 


-200 


1540 


- 48 


3010 


- 68 


4240 


-214 


4510 


-142 


4790 


-139 


5340 


- 34 


11030 


-186 


11310 


-131 


11590 


- 47 


40 


-124 


370 


- 79 


1550 


-250 


3020 


-118 


4250 


- 67 


4520 


- 


4800 


- 96 


5500 


- 


11040 


- 73 


11320 


-186 


11600 


-170 


50 


-180 


380 


- 63 


1560 


- 46 


3030 


- 29 


4260 


- 31 


4530 


-120 


4810 


- 67 


5510 


- 10 


11050 


-131 


11330 


-149 


11620 


-186 


70 


-192 


390 


- 20 


1570 


- 51 


3500 


-132 


4270 


- 61 


4540 


-107 


4820 


- 72 


5520 


- 61 


11060 


-186 


11340 


-131 


11630 


- 77 


80 


-182 


395 


-140 


1580 


-215 


3510 


-160 


4275 


-142 


4550 


-142 


4830 


-142 


5530 


- 2 


11070 


-161 


11350 


- 62 


11640 


-152 


90 


-201 


400 


- 76 


1590 


-239 


4000 


- 


4280 


- 


4560 


- 


5000 


- 


5540 


- 3 


11080 


-131 


11360 


-170 


11650 


-158 


100 


- 


405 


-155 


1600 


- 69 


4010 


- 64 


4290 


-125 


4570 


-115 


5020 


- 46 


5550 


- 2 


11090 


-186 


11370 


-186 


11660 


-166 


110 


- 69 


410 


- 32 


1610 


-238 


4020 


-242 


4300 


-168 


4580 


- 60 


5030 


-104 


5560 


- 4 


11100 


- 61 


11380 


- 73 


11670 


-170 


120 


-110 


420 


- 58 


1620 


-227 


4030 


- 49 


4310 


-141 


4590 


-122 


5040 


- 39 


5570 


- 84 


11110 


-205 


11390 


-131 


11680 


- 7 


130 


-172 


430 


-201 


1630 


- 99 


4040 


-144 


4320 


-184 


4600 


-126 


5050 


-139 


5580 


-110 


11120 


-186 


11400 


-186 


11690 


-131 


140 


-193 


440 


- 50 


1640 


-189 


4050 


- 47 


4330 


-142 


4610 


-167 


5060 


-229 


5590 


-142 


11130 


-149 


11410 


-100 


11700 


-186 


150 


: 66 


1000 


- 


1650 


-165 


4060 


-203 


4340 


- 


4620 


-162 


5070 


-102 


10000 


- 


11140 


-205 


11420 


-131 


11710 


- 73 


170 


-141 


1010 


-101 


1660 


- 


4070 


- 


4350 


-152 


4630 


-142 


5080 


- 39 


10010 


- 40 


11150 


-117 


11430 


-142 


11720 


-131 


180 


- 9 


1020 


-150 


1670 


- 82 


4080 


- 10 


4360 


- 95 


4640 


- 


5090 


-139 


10015 


-207 


11160 -170 


11440 


-170 


11730 


-187 


190 


- 3 


1025 


- 94 


1680 


-219 


4090 


- 


4370 


- 


4650 


- 59 


5100 


-229 


10020 


-208 


11170 


- 


11450 


-182 


11750 


- 88 


200 


-112 


1050 


- 31 


1685 


- 15 


4100 


-105 


4380 


-147 


4660 


-171 


5110 


- 


10030 


- 82 


11180 


-119 


11460 


-186 


11755 


-217 


210 


-212 


1055 


- 84 


1690 


- 67 


4110 


-110 


4390 


-162 


4670 


- 90 


5120 


- 


10040 


-180 


11190 


-204 


11470 


- 83 


11760 


- 17 


220 


-236 


1056 


-116 


1700 


-142 


4120 


- 83 


4400 


- 95 


4680 


- 42 


5125 


-249 


10044 


-156 


11200 


-186 


11480 


-165 


11770 


-116 


230 


- 78 


1057 


-152 


2000 


- 


4130 


-180 


4410 


- 


4690 


- 52 


5130 


-142 


10045 


- 


11210 


-237 


11490 


-178 


11700 


- 16 


240 


-12i 


1070 


- 48 


2005 


- 47 


4140 


-142 


4420 


-143 


4700 


-153 


5200 


- 


10050 


-170 


11220 


-131 


11500 


-191 


11790 


- 


250 


-162 


1080 


- 35 


2110 


-235 


4150 


- 


4430 


-186 


4710 


- 89 


5210 


-102 


10060 


- 13 


11230 


-186 


11510 


-190 


11800 


-130 


260 


-112 


1090 


-203 


2020 


- 29 


4160 


-210 


4440 


- 


4720 


-189 


5220 


-185 


10070 


-234 


11240 


-155 


11520 


-131 


11810 


-142 


300 


-212 


1100 


-142 


2030 


-175 


4170 


-178 


4450 


-120 


4730 


-142 


5230 


-163 


10080 


-203 


11250 


-131 


11530 


-186 






310 


-183 


1500 


- 


2500 


- 51 


4180 


-103 


4460 


-182 


4740 


- 


5240 


- 33 


10090 


-142 


11260 


-1B6 


11540 


-161 






320 


-150 


1510 


-188 


2510 


-110 


4190 


-214 


4470 


-142 


4750 


- 66 


5300 


- 


11000 


- 


11270 


- 57 


11550 


-131 


TOTAL! 


330 


- 3 


1515 


-217 


2520 


-142 


4200 


- 61 


4480 


- 


4760 


- 17 


5310 


-102 


11010 


- 21 


11280 


-131 


11560 


-186 


34604 
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PVP 275 PTAS. 



DE PR OGRAM AS ] 



« 



^QUI HALLARAS TODO 
!L SOFTWARE DEL 
■RCADO EN MSX. 
E LO PIERDAS. 
Programas de juegos 
itilidad, educativos, 
jestión. Una guía 
tmpleta con más 
100 títulos, 
issettes, cartuchos, 
liskettes, tarjetas y 
ibros. 

además todas las 
empresas de hardwai 
software con sus 
direcciones y teléfonos. 
Un número 
¡prescindible para 
isuario MSX. 
ESTA EN TU 
IOSCO 
CLUB ESPECIAL 
(E algo FUI 



■ 



J 



Éá 



MSX por dentro 



,Por Willy Miragall, 



MSX BASIC 
PLUS (I) 



¿Quién no querría tener en su 
MSX la posibilidad de trabajar 
con 35 pantallas, entre gráficas y 
texto, de poderlas intercambiar 
instantáneamente, almacenarlas, 
etc? ¿Pura utopía? Dentro de 
muy poco 



Los ordenadores MSX nos sor- 
prendieron a todos por la poten- 
cia de su lenguaje BASIC, que 
permite el manejo de cuatro diferentes 
pantallas, un potente chip de sonido, y 
que no deja de ser, por estas caracterís- 
ticas uno de los lenguajes punteros en 
ordenadores domésticos. 

Esta potencia de lenguaje, unida a su 
principal característica, la compatibili- 
dad, ha sostenido el imparable auge del 
estándard. 

Hasta hace muy poco, hablar de 
ordenadores compatibles era hablar de 
sistemas herméticos, que no permitían 
modificaciones que rompieran el es- 
tándard. No ocurre así en el MSX, que 
es un sistema abierto a todo tipo de 
innovaciones, tanto en soft como en 
hard, tómense como ejemplo, el Pio- 
neer PX-7, con su revolucionaria uni- 
dad de superimposición de video, así 
como el Yamaha CX 5M, con su po- 
tentísimo chip de sonido. ¿Cómo es 
posible que máquinas tan avanzadas 
sean compatibles con nuestro MSX? 

Los ordenadores MSX permiten al 
ordenador ampliar su abanico de ins- 
trucciones. Sí, sí, lo que oís, añadirle 
instrucciones al BASIC. Esto, en prin- 
cipio, sólo es posible con cartuchos de 
ROM que contengan el código ensam- 
blado de los comandos con que amplia- 
mos al BASIC (el programa en código 
máquina de las nuevas instrucciones, 
para que nos entendamos), por lo que 
únicamente empresas importantes, lo 
suficiente como para adquirir un gra- 
bador de ROMs y la cadena de montaje 
para montar los cartuchos, pueden per- 
mitirse este lujo. Resultado; la amplia- 
ción del BASIC resulta por lo general 
cara y de poca difusión. Cabe decir que 
en España ya se comercializan cartu- 
chos con dichas ampliaciones. 

Pero nuestro objetivo radica en hacer 
asequibles estas ampliaciones, de modo 
que no se vieron monopolizadas por 
los fabricantes de cartuchos. Y he aquí 
la idea: ¿por qué no engañamos al 
ordenador? 

En los ordenadores con más de 48 




kB (la mayoría de los MSX) existe una 
zona de memoria destinada al sistema 
operativo de disco que en ningún caso 
es utilizada conjuntamente con el BA- 
SIC. Por lo tanto disponemos de una 
zona de memoria libre no utilizada por 
el BASIC. Intentaremos hacer creer a la 
máquina que esta zona de memoria es 
una extensión externa, es decir, un car- 
tucho de ROM. Para ello introducimos 
en varios puntos precisos los códigos 
determinados que hacen creer al orde- 
nador que está trabajando con un car- 
tucho de ROM. 

Ya no queda más que empezar a pro- 
gramar los nuevos comandos. 

MODO DE TRABAJO 

Este es el proceso seguido para desa- 
rrollar el programa que ahora os pre- 



sentamos: su nombre, MSX BASIC 
PLUS. Se trata de un conjunto de ruti- 
nas que reubican todas las tablas de la 
VRAM (ram de video) de forma que 
podamos instalar un mayor número de 
pantallas e intercambiarlas muy rápida- 
mente. 

Así conseguimos las siguientes pan- 
tallas en cada modo: 

• SCREEN 0: En este modo 
contamos con 14 pantallas indepen- 
dientes en lugar de una sola como sería 
normal. 

• SCREEN 1 : En este modo con- 
tamos con 1 1 pantallas. 

• SCREEN 2: En este modo con- 
tamos con una pantalla gráfica, lo habi- 
tual en los MSX; pero hemos añadido 
una pantalla de texto con 40 columnas. 

• SCREEN 3: Aquí son 8 las pan- 
tallas generadas. 
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Vamos a empezar a tratar con un po- 
co más de profundidad, cómo funcio- 
nan los nuevos comandos del BASIC 
en cada modo de pantalla. 

Los comandos incorporados al BA- 
SIC son dos: 
-USO(x) y -VEO(x) 

SCREEN 0: 

El comando -VEO(x), (donde x es 
un número entre y 13) nos permite 
ver cualquiera de las 14 pantallas dispo- 
nibles en este modo. Por ejemplo, si 
hacemos -VEO(7) aparecerá en la pan- 
talla un conjunto de símbolos extraños; 
pero por más que lo intentemos no 
conseguiremos escribir nada en la pan- 
talla. ¿Qué ocurre? Nada más simple, 
estamos viendo la pantalla 7; pero to- 
davía usamos la pantalla 0. Prueba aho- 
ra a escribir, aunque no lo veas en la 
pantalla, -VEO(0) y a pulsar RE- 
TURN. Aparecerá ante tus ojos todo 
lo que hayas tecleado mientras veias la 
pantalla 7. 

Prueba ahora a hacer: 

-VEO(7): -USO(7) (RETURN) 

ahora sí puedes borrar la pantalla o 
utilizarla a tu antojo, y lo mismo con 
las otras 13 restantes. Si quieres borrar 
todas las pantallas tendrás que hacer: 
FOR X=0 TO 13: -USO(X) : CLS: 
NEXT X: -USO(0) 

Ya sabes como utilizar estas panta- 
llas. La tremenda velocidad de cambio 
de pantalla (el cambio es totalmente 
instantáneo ya que sólo se modifica un 
byte de RAM y uno de los registros del 
chip de pantalla) te permitirá lograr 
efectos espectaculares, o bien, escribir 
en una pantalla mientras el usuario está 
leyendo otra, consiguiendo así saltosde 
página instantáneos. 

SCREEN 1: 

Los comandos -USO(x) y -VEO(x) 
funcionan en SCREEN 1 de forma 
idéntica a como ocurre en SCREEN 0, 
con la salvedad de que en este modo 
sólo podemos trabajar con 1 1 pantallas 
(x oscilará entre y 10, por lo tanto). 
A los efectos logrados en SCREEN 
odéis añadir los conseguidos mediante 
a definición de caracteres en color, ex- 
clusiva del SCREEN 1 (recordad que la 
mayoría de los juegos comerciales utili- 
zan esta pantalla y no la pantalla gráfi- 
ca; SCREEN 2). 
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SCREEN 2: 

El tremendo volumen que ocupa una 
pantalla de gráficos, 12 Kb si no utili- 
zamos los sprites, nos impedía generar 
dos pantallas de gráficos. El precio en 
memoria de incluir otra pantalla era de- 
masiado alto (reducir los 28 Kb de 
usuario a tan sólo 16 Kb), por lo que 
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T N P: Tabla de los números de los patrones. 
T G P: Tabla generadora de los patrones. 
N U: Zona no utilizada. 

Tabla 1: Distribución de la VRAM normal y en MSX BASIC PLUS. 



optamos por añadir al SCREEN 2 una 
pantalla de texto (que sólo ocupa 0.96 
Kb). 

El cambio funciona de modo similar 
a los otros SCREEN. El comando 
-VEO(0) nos permitirá ver la pantalla 
de gráficos y -USO(0) trabajar sobre 
ella. Recordad que mientras estemos en 
modo gráficos no podemos utilizar co- 
mandos como PRINT, INPUT o LO- 
CATE. 

Pero al utilizar -VEO(l) aparece 
ante nosotros la pantalla de texto. Po- 
demos seguir utilizando las sentencias 
gráficas: LINE, PSET, CIRCLE, 
DRAW, etc. aunque no veamos por el 
momento los resultados. Al hacer 
-VEO(0) veremos instantáneamente 
todos los gráficos generados mientras 
veíamos la pantalla de texto. 

Es importante que notéis que al usar 
la pantalla uno, con -USO(l), quedan 
activados de nuevo los comandos de 
texto: LOCATE, PRINT, INPUT, 
etc. y desactivados los de gráficos, por 
lo que aparecerá un "Illegal function 



cali" si intentáis utilizarlos mientras es- 
tamos usando la pantalla 1. 

Os incluimos un efecto interesante 
para que podáis comprobar la veloci- 
dad de cambio de las pantallas, consis- 
tente en la visualización simultánea de 
la pantalla de gráficos y la de textos en 
SCREEN 2. Teclead el siguiente pro- 
grama tras haber introducido la am- 
pliación del BASIC. 
10 SCREEN 2 

20 LINE (0,0) - (255,191),15 
30 CIRCLE (128,96),40,7,„4/3 
40 PAINT STEP(0,0),7 
50 USO(l) 
60 CLS 

70 LOCATE 10,0:? "UN TEXTO 
EN SCREEN 2" 
80 X=0:Y = 1 

90 ON INERVAL=1 GOSUB 200 
100 INTERVAL ON:GOTO 100 
200 -VEO(X):SWAP X, Y: RE- 
TURN 

Funcionará igualmente si ambas 
pantallas están llenas. Comprobadlo 
vosotros. 



— 
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MSX por dentro 



Dependiendo de la persistencia de 
vuestro monitor o televisor observaréis 
que los textos y gráficos vibran ligera- 
mente. Esto podría solucionarse si 
cambiásemos más veces por segundo de 
pantalla (en este programa lo hacemos 
50 veces cada segundo); pero en ese ca- 
so, al no coincidir la frecuencia de cam- 
bio con la de barrido de la pantalla 
(también 50 veces por segundo) apare- 
cerían líneas horizontales en la pantalla. 
Haced la prueba. Esas líneas desapare- 
cerán siempre que ambas frecuencias 
sean múltiplos una de la otra. 

SCREEN 3: 

En este modo sólo contamos con 8 
pantallas; pero a esto sumamos otro 
pequeño invonveniente, y es que los 
comandos -USO(x) y -VEO(x) no son 
independientes, como ocurría en los 
otros modos. 

Aquí ambos comandos tienen el mis- 
mo significado, es decir, si hacemos 
-VEO(3) automáticamente trabajare- 
mos en la pantalla 3, y si hacemos 
-USO(6) pasaremos a ver la pantalla 6, 
aunque no entremos el comando 
-VEO(6). 

La razón de esta limitación viene 
ampliamente explicada en la segunda 
parte de este artículo, consistente en 
una explicación un poco más técnica 
del funcionamiento de estas instruccio- 
nes, sus repercusiones en la VRAM y 
en la RAM de usuario. 
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T N P: Tabla de los números de los patrones. (768 bytes) 
T G P: Tabla generadora de los patrones. (2 Kb) 
T G S: Tabla generadora de los sprites. (2 Kb) 
TAS: Tabla de atributos de los sprites. (1 Kb) 
T C: Tablas de colores. (32 bytes) 

Las zonas no utilizadas han sido sombreadas. 

La tabla de color en el BASIC PLUS se encuentra entre la TNP y la TNP 
1, en la dirección 5888 (hex: £1700). 

Tabla 2: Distribución de la VRAM normal y PLUS en SCREEN 1. 




JUEGA COMO UN CAMPEON 

METE EL GOL QUE TE HARA MILLONARIO 




El programa imprescindible para la liga más larga 
de la historia española 

QUINIELAS te ofrece: 

introducir 38 equipos - introducir el partido de la jornada - almacenar los resultados, los goles 
locales y los goles visitantes - estadística gráfica de aciertos - realizar 25 boletos de 8 apuestas 
(200), por reducción o al azar - sacar los boletos por impresora - clasificación detallada - 
estadística gráfica de equipos - estadística gráfica de quinielas - grabación de datos en cinta - 
escrutinio de boletos memorizados - consultas y correcciones - etc., etc. 

TELAS HOY MISMO SOLO 700 Ptas. 



CURSO DE INGLES 



The Gruneberg Linkword Language System es un sistema, para enseñanza de idiomas, más rápido y 
fácil que los métodos convencionales aplicados actualmente. 

En poco tiempo, máximo 20 horas, te enseñará un vocabulario de 400 palabras y adquirirás unas buenas 
nociones de gramática. Esto te permitirá entender y ser entendido en tus viajes a lugares de habla inglesa 
o en tus contactos con personas que se expresen en ese idioma. 

Por otra parte, el Sistema PlusData, consigue que el ordenador se convierta en un perfecto profesor que 
te explicará, orientará y corregirá, manteniendo en todo momento un "diálogo" interactivo de resulta- 
dos sorprendentes. 



THE GRUNEBERG LINKWORD 
LANGUAGE SYSTEM 

.u/doto 



pi 




-L.Taylor. "POPUlAR 
COMPUTER WORLD : 

«Quedé francamente atónito al 
Aprobar la efectuad de la 

elemento de ayuda a la reten 



-"PERSONAL COMPUTER 
WORLD": 

"Un suceso fuera de serie..." 
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Programas de EAO para EGB. 




...................... 



Nombre . 
Apellidos 

Dirección , 

Población , 

D.P 

Forma de pago: 



I 



M 



...... 



Reembolso [ 



.Tino 

Giro postal |~] 





i................. ............ 

Envío talón □ 



□ Curso de Inglés 1.» parte. 10 lecciones Linkword. (Cinta) P.V.P. 6.900.-Ptas. 

□ Curso de Inglés 1. a parte. 10 lecciones Linkword. (3,5"-Disk) P.V.P. 7.900.-Ptas 

ENVIAR ESTE CUPON A: PLUS DATA, S.A. CA GRAN VIA, 661 pral. 08010-Barcelona. Tel. 246 02 02 



Monitor al díai 



FORBIDDEN FRUIT 



Nuevo título de acción de 
MINDS GAMES 

Eres un tranquilo granjero de 
Transylvania, que por una serie 
de azares te ves obligado a visi- 
tar las ruinas de un castillo abandona- 
do, del cual nunca ha vuelto nadie. Vas 
armado, pero los peligros son muchos. 
Mind Games España inicia con la pu- 
blicación de este apasionante juego la 
presentación de su nuevo catálogo de 
software para MSX que incluirá más de 
40 títulos. 

A la vista de lo absolutamente cautiva- 
dor que es este juego, estamos seguros 
que va a tener una gran acogida (sobre 
todo en Navidades) esta serie de 
MIND GAMES. 



grama de gestión odontológica, que 
puede llevar perfectamente la consulta 
media de un odontólogo: soporta del 
orden de 2000 pacientes con 90 inter- 
venciones por paciente por cada dis- 
kette. 

Realiza no sólo la gestión de Agenda e 
intervenciones de pacientes, sino tam- 
bién la derivada de facturación, presu- 
puestos y el control de stocks derivado 
de los productos farmacéuticos. ¿Es 
usted dentista? 



MUSIC-M0DULE 



El Interfaz Musical de 
PHILIPS 



c 



ualquiera puede ya componer o 
interpretar música con el inter- 
faz musical de PHILIPS. Sólo 



con pulsar cualquier tecla de la fila 
indicada en el ordenador, cualquiera 
puede interpretar un tema con una pis- 
ta de acompañamiento que siempre so- 
nará agradable, puesto que el sintetiza- 
dor FM del sistema analiza la pulsación 
en relación con las anteriores y lo 
armoniza instantáneamente. 
También va equipada esta unidad ade- 
más del Sintetizador FM con conexio- 
nes MIDI (IN, OUT y THRU) y de un 
dispositivo de muestreo de sonido, que 
permite digitalizar sonido proveniente 
de fuentes externas (micro incorporado 
o toma audio) y combinarlo con pistas 
de apoyo, modularlo, ponerle Eco y 
todo tipo de efectos especiales. Opcio- 
nalmente, PHILIPS también suminis- 
tra un teclado que — conectado al MU- 
SIC-MODULE— convierte tu MSX 
en un teclado polifónico de hasta 9 no- 
tas simultáneas. 

El manejo de las pantallas se realiza 
mediante iconos, lo cual unido a sus 
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LANZAMIENTO DE PHILIPS DE 
SOFTWARE PARA 
COLECTIVOS 

Programa de Gestión 
Odontológica para MSX2 



Además de los paquetes de ges- 
tión que ha presentado PHI- 
LIPS dentro de su línea para la 
segunda generación, pensado priorita- 
riamente para pequeñas y medianas 
empresas, PHILIPS ha hecho una 
incursión en los llamados «mercados 
verticales», entre los cuales esperan una 
buena acogida de los MSX2 sobre todo 
debido a la excelente relación calidad- 
precio, difícilmente alcanzable por 
otros sistemas que trabajan en 16 Bits. 
La primera aplicación ha sido este pro- 



K0NAMI PRESENTA DOS NUEVOS CARTUCHOS 



Títulos de impacto 



Se trata de Green Beret y Jail 
Break, realmente los títulos son 
de impacto, puesto que el primero 
va de boinas verdes y el segundo de la 
fuga de una prisión. 
Esta incursión en programas de acción, 
representa una nueva victoria de Kona- 
mi, que está — ahora más que nunca — 



a la vanguardia del software de entrete- 
nimiento. Como siempre, estos pro- 
gramas son suministrados en formato 
de cartucho para efectuar una carta ins- 
tantánea y prometen acción para rato. 
Para aquellos que aman sobre todo la 
acción y las emociones fuertes van re- 
comendados especialmente estos dos 
nuevos títulos, que estamos seguros de 
que colmarán absolutamente sus 
expectativas. 
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menús de fácil uso lo hacen accesible a 
cualquier profano (tanto en música co- 
mo en programación). Su precio ronda 
las 15.000 pesetas. 



AEROBIOS 



La aventura gráfica de 
Idealogic 

En esta misma sección, el mes pa- 
sado comentábamos la presenta- 
ción del software para MSX2 
desarrollado por la firma Idealogic para 
PHILIPS, y hablábamos de un progra- 
ma titulado AEROBICS, que —como 
podemos deducir — es un curso com- 
pleto de Aerobic que se da con un 
completo manual de ejercicios, mien- 
tras se observa una muñeca en la panta- 
lla que ra realizándolos en la pantalla al 
compás de la música. 
De por sí, este programa puede hacer 
las delicias de las amas de casa que po- 
sean un MSX2, puesto que pueden re- 
petir los ejercicios uno a uno, ir hacia 
adelante o hacia atrás e incluso progra- 
mar la velocidad de los mismos. Ha- 
ciendo otro tipo de consideraciones, 
podemos decir que el programa hace 
resaltar la inmensa capacidad gráfica de 
los MSX2, ya que las secuencias de ani- 
mación de la figura realizan una simu- 
lación prácticamente perfecta del movi- 
miento. Recomendable para todos. 



SONY HB-F9S 



Un MSX2 DOMESTICO 

Al caer el Otoño empiezan a co- 
mercializarse las novedades 
expuestas por los fabricantes de 
la norma MSX que fueron presentadas 
en SONIMAG. 

SONY España lanza al mercado el 
ordenador HB-F9S, concebido como 
un MSX2 doméstico. Se trata de un 
aparato especialmente indicado para 
aquellos que ya dominan el BASIC y 
pretenden ahondar más en el apasio- 
nante campo de la Informática. Su con- 
cepción doméstica incluye accesorios 
tan evidentes como la salida RE con la 
que va equipado, que permite la cone- 
xión del ordenador al televisor domés- 
tico. 

Este aparato cumple los requisitos 
máximos de memoria previstos para la 
segunda generación de MSX, es decir: 
128 Kb de memoria RAM de 
usuario, 128 Kb de VRAM, 
96 Kb de ROM. 



Además, incluye un programa de apli- 
cación personal incorporado en ROM: 
Listín telefónico, Agenda personal, Re- 
loj, Calendario, Calculadora... 

JS-70 • 

EL JOYSTICK 
PROFESIONAL DE SONY 

Siguiendo con las novedades pre- 
sentadas por SONY para este 
Otoño del 86, cabe destacar el 
joystick JS-70, desarrollado para cum- 
plir con las cada vez más sofisticadas 
exigencias del software MSX, que cada 
vez necesita herramientas de mayor 
precisión. 

Este joystick, de alta velocidad de res- 
puesta, incluye 2 pulsadores de disparo 
en cada uno de los lados de la palanca 
para facilitar la operación; todo lo cual 
lo hace recomendable tanto para dies- 
tros como para zurdos. Tiene 8 direc- 
ciones de movimiento, lo que resulta 
ideal para aplicaciones de preci- 
sión donde se requiere un 
movimiento punto 
por punto y una 
gran rapidez 
de res- 
puesta. 




Programa 



Por Enrique Roldán, 



CRAF-1 



Estupendo programa de gráficos en el 
que su autor reproduce una de nues- 
tras portadas con bastante fidelidad. 
Tras 15" ha de pulsarse la barra espa- 
dadora para que aparezca el dibujo. 



10 COLOR 15,1,1 
20 C=15 

30 QPEN'GRP: "ASI 

40 DEFUSR1=65:DEFUSR2=68 

50 CLS 

60 SCREEN 2 

70 PSEK0.0) 

80 A=USR1(0) 

90 FOR 1=1 TO 800:PRINTtl,T;:NEXT I 
100 A=USR2(0) 

110 IF INKEYIO" " THEN 110 

120 LINE(100,1)-(170,191),5.BF 

130 DRAN , C15BH100,39I1119,47H162,63M170,Ó 

INT(Ü0,47),15 

140 DRAW B C15BM100.60ril 12, 67M1 12. 79M100, 

79H100,60':PAINT(105,67),15 

150 DRAWC4BH160, 7BH170, 81M170, 145M166, 1 

89M102,189H103,104H130,63fH60,78 n :FAINT( 

165, 85), 4 

160 LINE(100,0)-<170, 191), 15,8 

170 DRAW"C1BM130, 12M134, 1R26H 165. 27M163, 

38M162,66H159,82H156,101M155,101M156,81H 

152,71M154,57M152, 13M132, 8M1 18, 42BM132, 8 

H130,12 , :PAINT(146,6),l:DRAWC15Blil62,56 

fll60,55U3H160,53M162,38R2" 

180 DRAWC14BM132. 811152, 1311154,5711152,71 

11138,6711138, 72M129, 6?M 1 30 , 63M 1 1 9 , 60M 1 1 8, 

42M32,8":PAINT(138,27),14 

190 DRAW-C1BM139.48M141 .52M144. 47M152.55 

H144,51H141,55H139,48BH119,47H128,41M130 

,47M133,44H130,51M127,44M119,47" 

200 LINE(154,68)-(159.20),1.BF 

210 DRAWC1BM133, 4711135. 43I1130,63H132 I 61 

H138,63D2H130,63H129,69í!138,72H138,65M14 




290 LINE(131,62)-(138,72!,14,BF 

300 DRAN"C6Bm24,88H145,95M146,100l1118.9 

0M124,89 n :PAINT(143,97),6 

310 CIRCLE(116,B3),6,14,,,1.8 

320 PAINT(116,83),14 

330 DRAWC15BM100, 126M170, 133M170, 145M10 

0,136M00,126":PAINT(110,130),15 

340 DPAW n C7BM14, 104M118, 111H142, 122H154 

, 106M162, 108(1160, 150M112, 145M114, 104":PA 

INK120. 138) ,7 

350 DRAWC4BM126, 115Í1142, 122M154, 106M143 
. 13611140, 135H136, 144M130, 132H126, 115":PA 
INT (136, 132) ,4 

360 DRAH B C5BH112, 15BM159, 164M159, 174M111 

, 17111112, 158 n :PAINT(115, 162), 5 

370 DRAWC13BM110, 95H151, 11111142, 122MU8 

. 1UM110,95":PAINT(132, 108) , 13 

380 GOTO 380 



0,56" 

220 CIRCLEÍ 126,53) ,5, 1, , , 1. 4 

230 CIRCLE(146,60),5,1,,,1.4 

240 CIRCLE(126.53) , 4, 15, , , 1 . 4: PAINT ( 126, 

53),15:LINE(126,51)-Í126,52),1 

250 CIRCLE(146,60) ,4, 15, , , 1 . 4: PAINTí 146, 

60!,15:LINE(146.58)-(146,59),1 

260 DRAW"C1BM123,44M1 19, 43M1 1 9 , 60M1 30 , 63 

BM13B,67H143,68M139,60H138,67H152,70' 

270 DRAH n ClBH134.78H148,88l1146,98l1155,10 

1M151, 111M110,95M110, 8711118, 90M116, 76M12 

4,78M134,78":PAINT(134,84),1 

280 DRAW"C13BM119,55f1112,66M110,87H118,9 

0M1 18.78M134, 78M148, 88M146, 9BM155, 101M15 

8. 81«152,71M138,67M138.72M129,69r1130,63M 

119,60H119,55":PAINT(118,69),13 



Test de listadoH^^H 


10 - 87 


140 -200 


270 


- 36 


20 - 80 


150 - 43 


280 


- 13 


30 -220 


160 - 94 


290 


-103 


40 -200 


170 -156 


300 


-144 


50 -159 


180 - 86 


310 


-164 


60 -216 


190 -178 


320 


-106 


70 - 97 


200 - 90 


330 


-248 


B0 -129 


210 - 2 


340 


-205 


90 - 64 


220 -128 


350 


-222 


100 -130 


230 -155 


360 


- 9 


110 -239 


240 -139 


370 


-151 


120 -157 


250 -166 


380 


- 20 


130 -180 


260 - 83 


TOTAL: 


4899 



ENTRA EN LA AVENTURA 
CORRE A TODA PASTILLA 
CON 

OTRO SENSACIONAL ¿J JUEGO DE MANHATTAN TRANSFERS, S.A. 





p 

MSJ 

PARTICIPA ( 

MSX CL1 



BASES 

1. "-Podrán participar todos nuestros lectores 
cualquiera sea su edad. 

2. °-Los programas se clasificarán en tres cate- 
gorías : 

Educativos 
Gestión 

Entretenimiento 

3. °-Los programas deberán ser remitidos gra- 
bados en cassette debidamente protegidas, dentro 
de su estuche de plástico. 

4. "-No entrarán en concurso aquellos progra- 
mas que ya hayan sido publicados por otros me- 
dios o plagiados. 

5 ."-Junto a los programas se incluirán las ins- 
trucciones correspondientes, detalle de las varia- 
bles, ampliaciones posibles y todos aquellos co- 
mentarios que el autor considere de interés. 

6.°-Todos los programas han de estar estructu- 
rados de modo claro, separando con REM los 
distintos sectores del mismo. 



PREMIOS 

7. "-MSX CLUB OTORGARA LOS SI- 
GUIENTES PREMIOS: . 

JOYSTICK DE ORO MSX CLUB Y UNA 
UNIDAD DE DISCO AL MEJOR PROGRA- 
MA DEL ANO. 

Además mensualmente se premiarán los pro- 
gramas publicados del siguiente modo: 

10.000 pts. los programas Educativos 

10.000 pts. los programas de Gestión 
6.000 pts. los programas de Entretenimiento 

FALLO Y JURADO 

8. °-EI Departamento de Programación de MSX 
CLUB DE PROGRAMAS hará la primera selec- 
ción de la que saldrán los programas publicados 
en cada número de la revista. 

9. °-Los programas no se devolverán salvo que 
así lo requiera el autor. 

10. °-La elección del PROGRAMA DEL AÑO se 
hará por votación de nuestros lectores a través de 
un boletín que se publicará en el mes de octubre 
de 1987. 

11. "-El plazo de entrega de los programas finali- 
zará el 31 de octubre de 1987. 

12. "— El fallo se hará conocer en el número de di- 
ciembre de 1987, entregándose los premios en el 
mismo mes. 




Remitir a: 




MI PROGRAMA 



Roca i B; 



2 



Programa 



iPor Tomeu Fontcubertai 




Divertido juego de habilidad, cuya 
música fue compuesta por Miguel 
Angel Muñiz, en el que tienes que 
transportar una serie de herramien- 
tas con una grúa a un camión, pero 
los pájaros te lo impiden 



10 mtmmmmmtt 

20 '$ LA GRUA * 

30 '! POR » 

40 '* TOMEU FONTCUBEPTA t 

50 t 1986 » 

¿0 'I PARA USX CLUB t 

70 mmmmmmm 

80 COLOR 1, 15, 13:CLEAP 500 
90 SCREEN 0:KEY OFF: WIDTH 35 
100 FQF W=0 TO 21 

1 1 pr i nt " » » §mum%mmmmm§ 

««■ 

120 NEXT M 

130 DEFINI X.Y,B.C,A,T,F.5,L,K,P,S,V.J 
140 LOCATE 12,5:PPINT" LA GRUA " 
150 LOCATE U.10:PRINT n HECHO POR " 
160 LOCATE 4,15:PRINT° TOMEU FONTCUBERTA 
FEBRER " 

170 LOCATE 12,1B:PRINT" 
180 LOCATE 12, I?:PRINT- PULSA ESPACIO " 
190 LOCATE 12.20:PRINT" 
200 Aí=!NKEY$:IF ft$<>» " THEN 200 
210 FOF: U-0 TO 20:READ B*:PLAY B$: NEXT U 
:PLAY n LSC n :PLAY n L16CE-DC" 
220 FOR W=0 TQ 24:PPINT: 
230 LOCATE 0.0 

240 ' »»TEGLAT JQYST1CK««« 
250 LOCATE l2.8iPRINT "0. -TECLADO" 
260 LOCATE l2,10sPRINT " 1 . - J0Y5TICK " 
270 LOCATE !1,12:FRINT "ESCOBE i» 
J$=IHKEY$!lF }$="" QR J$=" "THEN 2 
290 IF VAL(J$)>1 THEN 460 
300 JY=VAL!Jt> 

310 ' > " " DADES «USICA<««« 
320 DATA V!5T65.L8C4C.C,L16CE-DC,LSG0:5A 
B04C, C. L16Q4CE-DC, L8S035ABQ5C, C, L16CD-C, 
04B- , L8A-F. F. L3FB- , B-.L16B-Q5C04B- A- , L9 
6E- , E-, E-A-C . L 1 6E-P6A-, L8G 
330 ' ;>:>;ESCQLLIR NI VELL ' ' 
340 CLS 

350 LOCATE 4. 10:PPINT"9UE NIVEL QUIERES! 
1,2,3):" 

360 A$=iNKEV$:N=VAL(A*] 
370 IF N=l THEN FI=3:60T0 410 
380 IF N=2 THEN FI=5:G0TQ 410 
390 IF N=3 THEN FI= 7 :GÜT0 410 



400 5QT0 360 









410 CLS:L0CATE 3. 10:>RINT"QU!E»ES LAS IN 
STRUCCIONEStS/N)?" 

420 FOR U=0 TO 20SREAD BfsPLAY P$: NEXT U 
:PLAY n 03L8GAB04L8C. H 
430 A$=INKEY$ 

440 IF A$="S" DP A$="s" THEN 470 
450 IF A$="N" OR A$="n" THEN 640 
460 60T0 430 
470 RESTORE 580 
480 CLS 

490 FOR Q=l TO 3 
500 CLS: LOCATE .8 
510 POR W=l TO 2 
520 READ C$:PRINT C$ 
530 PPINT: PRINT 
540 NEXT M 

550 LOCATE 9:PRINT"PULSA ESPACIO" 
560 A$=INKEY$:IF A$<>" " THEN 560 
570 NEXT 

580 DATA " Este juego consiste en cargar 
el camión con los diferentes objetos 
que aparecerán en la pantalla." 
590 DATA " Has de luchar contra los pa 
jaros que quieren derribarte la carga y 
contra el tiempo." 

600 DATA " La puntuación es de 50,25, 
15 o 5 puntos según la distancia del 
ofejetO al camión." 

610 DATA " Conseguirás una vida extra c 
ada 150 puntos y la dificultad aumenta- 
ra. 1 

620 DATA "Para coger un objeto has de ap 
retar espacie a el botón disparador del 
joysti.k y para descargar hacer lo mism? 



630 DATA " HUCHA SUERTE" 

640 CL5:L0CATE 8. 1 : PR I NT " ESPERA UN HOME 

NTO" 

650 RESTORE 
660 S=0 

670 COLOR 1,3.14 

680 , )»»>>»DISENYA SPRITES<'«« 

690 RESTORE 8?0 

700 DIH J$(30) 

710 FOR W=l TO 27 

720 FQF Q-í TO 8 

730 PEAD A$ 

740 J$ ( W ) =-3 $ ( W ) +CHP$ í VAL ( " StH" *A$) ) 
750 NEXT Q 
760 NEXT M 
^70 SCREEN 2.2 

780 SPRITE$m=J$'4)*J$m*J$!5)*J$íl) 
790 SPRTTEI (2) «Jt ( W *J$ ÜHJ* (7) +« ü ) 

SPR I TE$ ( 1 = J $ ( 8 ! ♦ J $ ( 9 ) * J $ ( 1 ) + J $ 1 1 1 ) 
810 SPRITE$m=J$(2}*J$í!>+J$(3W$íl) 
820 SPRITE$(10)=J$!28) 
E30 FOR «=12 TO 24 STEP 4 
840 SPRITE$W4)=J$(II)*J$(N+1}*J$<W*2)+J 

*im) 

850 NEXT W 

860 - m>nm ®*.vmmw« 

870 DATA 00,00.00,00.00,00.00,00 
880 DATA 00.20.50.03.07,03,03,04 
m DATA 00,10,28,40.80,00.00,80 
900 DATA 01.01.02,04,08.08,04.00 
°10 DATA 80,80,40,20,10,10,20.00 
920 DATA 01.01.02.04,04.02,01.00 
"30 DATA 80,80,40,20,20.40.80,00 
940 DATA 0C, 1E,7F,4C,40,40,7F,21 
950 DATA 1D,06,00, 00, 00,00,00. 00 
960 DATA 30, 78, FE, 32. 02, 02, FE, 34 
970 DATA B8. 60, 00, 00. 00. 00. 00. 00 
980 DATA 00,00,00,00.00.00,01.06 
990 DATA 18,60.80,40.20, 1E,1E.0C 
1000 DATA 00.00.00.00,00.00,81.81 
1010 DATA 44,28,10,60,80.00,00,00 
1020 DATA 01,02,04.08. 10. 26, 3F.3F 
1030 DATA 3F,1F,1F,0F,0F,07,07,03 
1040 DATA 30,40.20, 10, 08, 04, FC,FC 
1050 DATA FC.F8,F8,F0,F0,E0,E0.C0 
1060 DATA 00.01.02,02,03,02,05,05 



26 



1070 DATA 08, 08, 11,11, 3E, 22, 44, 44 




1560 '»»»»»»COSES««««« 




2100 PUT SPRITE 3.(X,Q).1 


1080 DATA 80,40,20,20,E0,20,F0,30 




1570 F=INT(RND (-TIME) *28) : F=F*6+40 




2110 NEXT Q 


1090 DATA F8,88,7C,44,3C,22,1F,11 




1580 S=INT(PND(-TIME)t4)+3 




2120 IF X<220 THEN K=1:VID=VID+1 


1100 DATA 00,01,03,07,03,01,00.01 




15590 PUT SPRITE 8.(F,150),1.G 




2130 TP=0:LINE(140,173)-(190,180),15.BF 


1110 DATA 03,07,0F,1E,3C,78,70,20 




1600 RETURN 




2140 GOSUB 2180: GOSUB 2340 


1120 DATA 80,CC,FC,FC,F8,FC,FE.FF 




1610 '»»>INICIALITZA OCELLS««« 




2150 LO=0:M 


1130 DATA FE, 9C, 08, 00, 00, 00, 00, 00 




1620 IF FI=8 THEN FI=4:PE=PE-10:FOR 




2160 GOSUB 1560 


1140 OPEN "6RP: " AS 11 




TO FI:PUT SPRITE H7.+8, (260.260) ,6,7 




2170 RETURN 


1150 COLOR 10 




1630 IF PE=20 THEN PE=40 




2180 '»»»»PUNTUAR««««««< 


1160 FOR MX=20 TO 160 STEP 8 




1640 I=INT(210/FI) 




2190 IF K=l THEN PLAY 'T100V15O2L16BGB6 


1170 PRESET(20.WX):PRINT#!,"M" 




1650 B(l)=INT(RND(-TIHE)II)+40 




03L8EDC. ":K=0: RETURN 


1180 NEXT WX 




1660 C(l)=INT(B(l)/2) 




2200 IF F<80 THEN P=50:GOTO 2240 


1190 LINEÍ0,160)-(40,170),10,BF 




1670 FOR N7.=2 TO FI 




2210 IF F<120 THEN P=25:G0T0 2240 


1200 LINE (0,170)-(255.191!.15,BF 




16B0 B(HX)=B(NM)+I 




2220 IF F<180 THEN P=15:G0T0 2240 


1210 FOR N7.=20 TO 250 STEP 8 




1690 C(M)=C(WM)+INT(I/2) 




2230 IF F<255 THEN P=5 

2240 PLAY "V1505L16EC046EL4C" 


1220 PRESET(W7.,20):PRINTI}1,T 




1700 NEXT n 




1230 NEXT K7. 




1710 RETURN 




2250 PT=PT+P 


1240 PSET <20.2),10:DRAH "D17L17" 




1720 '»»EN CAS DE COLISIO««« 




2260 CO=CO+l 


1250 PSET (250,20), 1:DRAW 'M20,2H2,20K15 




1730 GOSUB 1610:GOSUB 2060 




2270 LINE (134.184)-(180.190),15,BF 


,159" 




1740 GOSUB 2340 




2280 COLOR 1 


1260 PSET (220, 155),6:DRAW"C6R21U7R6!1250 




1750 RETURN 1390 




2290 PSET (140.184).15:PRINT #l,USIN6'i# 


, 155M254, 158D7L34U10":PAINT (221, 156) ,6 




1760 ' »»»»OCELLS««««««< 




H§ PUNTOS" ; PT 


1270 CIRCLE (226.166),4,1,,.1.4:PAINT'22 




1?70 FOR Wí'l TO FI 




2300 INTERVAL ON 


5,165),1 




1780 PUT SPRITE W7.+3. !B(W7.) .C(M) ) .6,7 




2310 IF PTH5WS THEN VID=VID-1:S=S+1:FI 


1280 CIRCLE '245.166).4,1,,,1.4:PAINT(24 




1790 B(WX)=B!WX)-5 




=FI+1 


5,166), 1 




1800 C(W7.)=C(«X)+5 




2320 GOSUB 2340 


1290 COLOR l 




1810 IF C(WX)<40 THEN C!W¿)=150 




2330 RETURN 


1300 '»>!NICIALITZA VARIABLES 




1820 IF CÍKXmSI THEN C(W7.)=40 




2340 ' >>>>>I«PRIHXR yiDES««««« 


1310 X=120:Y="0:T=1:S=1:PE=50 




1830 IF B(«X)<40 THEN B(NX)=240 




2350 LINE (40,184)-(80.190),15.BF 


1320 ON STOP SOSUB 2400: STOP ON 




1840 IF B(W7.)>240 THEN B(WX)=40 




2360 COLOR 1 


1330 ON STRI5 SOSUB 1530, 1530, . 1530 




1850 NEXT VI 




2370 PSET (40.184).15:PRINT #1.U3INB"## 


1340 STRIG(0) DNiSTRISíl) ON :STRIB(3) 
N 




1860 RETURN 

1870 '»»MOUPE GANXO«<<««<« 




FALLOS": VID 

2380 IF VID=3 THEN 2400 


1350 ON INTERVAL=50 SOSUB 2510 




1880 IF X'42 THEN X=42 




2390 RETURN 


1360 ON SFRITE SOSUB 1720 




1891 IF X>240 THEN X=24g 




2400 J »»»FINALITZAR«<--: 


1370 GOSUB 1560: GOSUB 1970: SÜSUB 2290: GO 




1900 IF Y<38 THEN Y=38 




2410 INTERVAL OFF:STRIG(0) OFF: STRIS (1 ) 


SUB 2340 




1910 IF Y) 144 THEN Y=144 




0FF:STRIG'.3) OFF 


1380 GOSUB Í610 




1920 IF ft>5 THEN LINE (X+14.36)-(X+14. Y+ 




2420 3CREEN 0: COLOR 1 


1390 A=STICK'JY) 




8). 3 




2430 LOCATE 8,9:PRINT "TIENES"PT B P'JNTOS" 


1400 GOSUB 1760 




1930 IF A<5 THEN LINE (X+2,36)-(X+2, Y+8S 




2440 LOCATE 8,12:PRINT "CON"CO" OB JETOS" 


1410 ' ( y>»»»HQVIHENT««<«;« 




.3 




2450 LOCATE 8.15:PRINT "EN EL NIVEL'N 


1420 ON A+l GQTO 1390.1430,1440.1450,146 




1940 LINE (X+8,38)-'X+8,Y+2).l 




2460 LOCATE 4.19:PRINT "QUIERES VOLVER A 


0,1470. 1480, 14°0, 1500 




1950 LINE (X+8,Y*2MX+8.145),3 




JUGAR (S/NV 


1430 Y=Y-a:GOTO 1510 




1960 PUT SPRITE 0.(X.28),6,0 




24?0 A$=INKEY$ 


1440 Y=Y-6:X=X*6:G0T0 1510 




1970 IF A=l THEN PUT SPRITE 1,!X.Y\1J 




2480 IF AI="S B QR A$=V THEN RUN 


1450 X=X+5:GOTO 1510 

1460 X=X+6:Y=Y+6:G0T0 1510 




1980 IF T=2 AND LO=l THEN PUT SPRITE 8. ( 




24*0 IF A$= u N n OR A$="n" THEN END 




X,Y>8U.G:SPRITE ON 




2500 GOTO 2470 


1470 Y=Y+6:S0T0 1510 




1990 PUT SPRITE t,(H,Y),l,T 




2510 '»»»TEMPS««««« 


1480 X=X-6:Y=Y+6:G0T0 1510 




2000 RETURN 




2520 TP=TP+1 


1490 X=X-6:G0T0 1510 




2010 ? >>>>>>>)>ASftFAP<<<<<<<<^<<< 




2530 LINE (90,172)-(191,1B1),1.B 


1500 X=X-6: Y=Y-6:S0T0 1510 




2020 IF YU44 THEN T=2:LO=0:RETURN 




2540 COLOR 1 


1510 GOSUB 1880 




2030 IF X+8>f AND X+8<F*16 THEN :LQ=1:PL 




2550 PRESET (91. 173! :PRINT#1, "TIEMPO" 


1520 BOTO 1390 




AY "T190V15O4L8C.L16EL8GO5C , :PLAY "05L8C 




2560 COLOR 6 


1530 INTERVAL ON 




04GCEG05C. " 




2570 PRESET (140+TP, 173! :PPINTtl. T' 


1540 IF 1=1 THEN PLAY"T200V15L8O4G+O5E+ M 




2040 T=2 




2580 IF TP<PE THEN RETURN 


,'T2MV1504L8E+":60SUB 2010:GOSUB 1870:R 




2050 RETURN 




2590 VID=VID+1:STRIG(0) ON:STRIS(l) ON:S 


ETURN 1390 




2060 '>»»»>AMOLLAR««<- 




TRIG(3) ON 


1550 IF T=2 THEN PLAY"T200V15LSO5D+O4F+ n 




2070 IF LO=0 THEN T=l: RETURN 




2600 IF LO=0 AND T=l THEN GOSUB 2120 ELS 


, "T200V15R8LSC4D+": SOSUB 2060:GOSUB 1870 




2080 SPRITE OFF 




E 60SUB 2060 


IrtiUrN I3¥í 




2090 FOR 3=Y TO 140 




2610 RETURN 



27 




CAZA PIRATAS 



Fomenta la creatividad. Respeta el dere- 
cho de autor. Centenario de la conven- 
ción de Berna 1886-1986. 



Condiciones: 

Toda denuncia para esta sección deberá venir suscripta con 
los datos personales del denunciante, aunque su nombre no 
aparecerá publicado. 

— Deberá aportarse toda documentación que acredite el 
objeto de la denuncia, de lo contrario no se tendrá en cuenta. 

— La documentación recibida se hará llegar a la marca afec- 
tada para que tome las medidas jurídicas oportunas. 

— Una vez publicada la denuncia, ya no se tendrán en cuen- 
ta las que lleguen posteriormente sobre el mismo programa. 

— Los denunciantes recibirán como recompensa el progra- 
ma original denunciado. 

— Recordamos que se considera piratería la desprotección y 
copia de programas en cualquier formato y su uso con fines 
de lucro. 




SUPER CHESS rotulado por Topsoft se co- 
mercializa presuntamente de un modo ilegal 
en España, ya que es una versión de 
CHESS'86 comercializado por Philips. 



Programa 



Test de listado ■■ 




mm la grúa 




10 


- 58 


540 


-218 


1070 


-248 


1600 


-142 


2130 


- 94 


20 


- 5B 


550 


-138 


1080 


-248 


1610 


- 58 


2140 


- 41 


30 


- 58 


560 


-166 


1090 


- 59 


1620 


- 58 


2150 


- 42 


40 


- 58 


570 


-212 


1100 


-200 


1630 


-199 


2160 


-185 


50 


- 58 


580 


-190 


1110 


- 28 


1640 


-113 


2170 


-142 


60 


- 58 


590 


-177 


1120 


-214 


1650 


- 98 


2180 


- 58 


70 


- 58 


600 


-252 


1130 


- 7 


1660 


- 22 


2190 


-234 


80 


- 62 


610 


-151 


1140 


-224 


1670 


-104 


2200 


- 19 


91 


-211 


620 


-196 


1150 


-214 


1680 


- 75 


2210 


- 34 


100 


-214 


630 


- 14 


1160 


-141 


1690 


- 41 


2220 


- 84 


tíi 


-147 


640 


-160 


1170 


- 33 


1700 


-255 


2230 


-254 


120 


-218 


650 


-140 


1180 


-255 


1 7 10 


-142 


2240 


- 82 


130 


- 26 


660 


- 83 


1190 


- 68 


1720 


- 58 


2250 


-120 


140 


- 


670 


- 88 


1200 


- 63 


1730 


-212 


2260 


- 22 


150 


-158 


680 


- 58 


1210 


-231 


1740 


-200 


2270 


-133 


160 


-195 


690 


y 




1220 


- 32 


1750 


- 15 


2280 


-207 


170 


- 79 


700 


-114 


1230 


-255 


1760 


- 58 


2290 


-182 


180 


-217 


710 


-221 


1240 


- 36 


1770 


-103 


2300 


- 67 


1"0 


- 81 


720 


-198 


1250 


-125 


1780 


- 79 


2310 


-183 


200 


- 60 


730 


-236 


1260 


- 38 


1790 


- 21 


2320 


-200 


210 


-103 


740 


-222 


1270 


- B4 


1B00 


- 22 


2330 


-142 


220 


-184 


750 


-212 


1280 


-103 


1810 


- 64 


2340 


- 58 


230 


- 38 


760 


-218 


1290 


-207 


1820 


- 62 


2350 


-195 


240 


- 58 


77 


- 23 


1300 


- 58 


1830 


-152 


2360 


-217 


250 


-206 


780 


- 91 


1310 


-213 


1840 


-150 


23 7 


- 


260 


- 67 


790 


- 96 


1320 


-136 


1850 


-255 


2380 


-194 


270 


-174 


800 


-113 


1330 


-111 


1B60 


-142 


2390 


-142 


280 


- 72 


810 


- 93 


1340 


- 67 


1870 


- 58 


2400 


- 58 


in 


-146 


820 


- 46 


1350 


-229 


1880 


-102 


2410 


- 24 


300 


-228 


830 


-212 


1360 


-181 


1890 


-240 


2420 


-223 


310 


- 5B 


840 


-194 


1370 


-180 


1900 


- "6 


2430 


-223 


320 


-102 


850 


-218 


1380 


-235 


Üfí'f 


- 50 


2440 


- 19 


330 


- 58 


860 


- 58 


1390 


-197 


1920 


-231 


2450 


- 58 


340 


-159 


870 


-184 


1400 


-129 


1930 


-213 


2460 


- 33 


350 


- 65 


880 


-216 


1410 


- 58 


1940 


- 47 


2470 


- 64 


360 


- 


890 


-215 


1420 


-163 


!*50 


-156 


2480 


-220 


370 


M7B 


900 


-212 


1430 


-102 


1960 


- 55 


2490 


-201 


380 


-181 


910 


-210 


1440 


- 71 


1°70 


- 75 


2500 


- 70 


J?| 


-184 


920 


-199 


1450 


- 99 


1980 


-139 


2510 


- 58 


400 


- 


930 


-220 


1460 


- 70 


IWB 


-164 


2520 


- 58 


410 


- 96 


940 


- 61 


1470 


-101 


2000 


-142 


2530 


-253 


420 


-244 


<?50 


-211 


1480 


- 71 


2010 


- 58 


2540 


-207 


430 


- 64 


960 


- 53 


1490 


-100 


2020 


- 64 


2550 


-164 


440 


- 55 


970 


-216 


1500 


- 72 


2030 


-114 


2560 


-212 


450 


-216 


980 


-191 


1 j10 


-250 


204? 


- 86 


2570 


- 98 


460 


- 70 


990 


- 40 


1520 


- 10 


2050 


-142 


2580 


- 28 


470 


-224 


1000 


-202 


1530 


- 67 


2060 


- 58 


2590 


- 53 


480 


-159 


1010 


-217 


1540 


-128 


20 7 


- 29 


2600 


-192 


4*0 


-193 


1020 


- 2 


1550 


- 59 


2080 


-178 


2610 


-142 


500 


-246 


1030 


- 60 


1560 


- 58 


20«0 


-143 






510 


-P8 


1040 


- 37 


1570 


-164 


2100 


- 35 






520 


- "H 


1050 


-134 


1580 


-173 


2110 


-212 


TOTAL: 


530 


-92 


1060 


-204 


1590 


-216 


2120 


-214 


33030 



M.S.X. ly 2 
AMSTRAD 



'TE DESAFIAMOS • 



¡ACEPTA EL RETO! 



WAR CHESS 




DESAFIAMOS TU IMAGINACION, TU LOGICA, TU ESPIRITU DE 
AVENTURA. ATUJOYSTICK. TE DESAFIAMOS A PASARLO 
BIEN ¡A LO GRANDE! ON TU ORDENADOR! 

TE PRESENTAMOS LOS MAS ALUCINANTES JUEGOS. 
SUPERPROGRAMAS. SUPER: DESAFIANTES, INTRIGANTES, 
LLENOS DE ESTRATEGIA PARA QUE USES A FONDO TU IMAGI- 
NACION Y DEMUESTRES TU HABILIDAD E INTELIGENCIA. TE 
PROPONEMOS HORAS DE DIVERSION SEGURA. 
¿HASTA QUE HORA DE LA MADRUGADA RESISTIRAS? 



Vera I 
Cruz...i 





¡ACEP 



CUANDO LA LEYENDA SE CONVIRTIO HISTORIA 




^< M'ideaiogic: 



ss— i '• riirm ti - 7 ;v ~ 

EL CASO VERACRUZ/WAR CHESS /THE MOST AMAZING MEMORY GAME / MANDRAGORA / LAS VEGAS /EL GNOMO FED0R/3D MAGIC PIN BALL/SKATE DRAGON 



NFOCRAMES 



Pedidos: Tel. 253 74 00 



Calle Valencia, 85 - 08029 BARCLLONA Félex 54554 DLGC 
Teléfonos 253 86 93 - 253 89 09 253 90 45 • 253 74 00 



1 



BIENVENIDOS A 




UN SOFTWARE DE ALTA CALIDAD PARA MSX 



KRYPTON 




CON GARANTIA 

/14ANW^TRANBFEPSA 




KRYPTON. La batalla más audaz de las gala- 
xias en cuatro pantallas y cuatro niveles de 
dificultad Un juego cuya popularidad es cada 
vez mas grande entre los usuarios del MSX. 
PVP. 500 Ptas. 



U-BOOT. Sensacional Juego de simulación 
submarina en la que tienes que demostrar tu 
pericia como capitán de un poderoso subma- 
rino de guerra. Panel de mandos, sonar, tor- 
pedos, etc. PVP. 700 Ptas. 



CON GARANTIA 

/MANHATTAN TRANbFB? SA 



QUINIELAS. El más completo programa de 
quinielas con estadística de la liga, de los 
aciertos, etc. e impresión de boletos. Acertar 
no siempre es cuestión de suerte. PVP. 700 
Ptas. 




SNAKE. Entretenido y muy divertido Juego 
en el que Snake procura comer unos núme- 
ros que la engordan. Tanto las murallas que 
la rodean como su larga cola pueden ser 
mortales para ella. PVP. 600 Ptas. 




EL SECRETO DE LA PIRAMIDE. Atrevido 
juego de aventuras a través de los misterios 
y peligros que encierran los laberínticos pa- 
sillos de una pirámide egipcia. ¡Atrévete si 
puedes! PVP. 700 Ptas. 



STAR RTJNNER. Conviértete en el audaz pilo- 
to Interestelar y lucha a muerte, a través del 
tüperespacio, contra las defensas del tirano 
Daurus. Dos pantallas y cinco niveles de difi- 
cultad PVP. 1.000 Ptas. 



PLOPPY. El Preguntón. Un verdadero desafio 
a tus conocimientos de Geografía e Historia 
española. Ploppy no perdona y te costará 
mucho superarlo. PVP. 1.000 Ptas. 



MAD FOX. Un héroe solitario es lanzado a 
una carrera a vida o muerte por un desierto 
plagado de peligros. Conseguir el combusti- 
ble para sobrevivir es su misión. Diez niveles 
de dificultad PVP. 1.000 Ptas. 



Si quieres recibir por correo certificado estas cassettes garantizadas recorta o copia este boletín y envíalo hoy mismo: 

r~Ñombre y apellidos: 

Dirección: 

I Población: CP Prov Tel.: 

□ KRYPTON Ptas. 500,- □ SNAKE Ptas. 600- □ FLOPPY PVP 1000 Ptas 

I □ UBOOT Ptas. 700- □ EL SECRETO DE LA PIRAMIDE Ptas. 700- □ MAD FOX PVP 1000 Ptas 

' □ QUINIELAS Ptas. 700- □ STARRUNNER Ptas. 1.000- 

Gastos de envío certificado por cada cassette Ptas. 70,- 

Remito talón bancario de Ptas a la orden de Manhattan Transfer, SA. 

ATENCION: Los suscriptores tienen un descuento del 10% sobre el precio de cada cassette. 

IMPORTANTE: 

Indicar en el sobre MSX CLUB DE CASSETTES. ROCA I BATLLE, 10-12 BAJOS. 08023 BARCELONA 
Para evitar demoras en la entrega es imprescindible indicar nuestro nuevo código postal. 



NUESTRAS CASSETTES NO SE VENDEN EN QUIOSCOS. LA UNICA FORMA DE ADQUIRIRLAS ES SOLICITANDOLAS 

A NUESTRA REDACCION. ¡NO SE ADMITE CONTRA REEMBOLSO! 



tas. 




— 





Con este programa los estudiantes 
podrán disponer de una tabla de ele- 
mentos, definición de determinadas 
leyes químicas, nociones de formula- 
ción, etc. El acceso al menú es sencillo 
y bastante rápido. 



10 ' TEORIA QUIMICA 
20 ' Por Josep Lainez 
30 ' Para HSX CLUB 
40 REA INICIO 

50 CLS:KEY OFF: COLOR 15,1,1 

60 KEY(l) 0N:KEY(2) 0N:KEY(3) DNsKEYM) 

ON 

70 ON KEY GOSUB 140,1390,1530,3840 

B0 CLS:LOCATE 14,0:PRINT"HENU" 

90 LOCATE 6,4:PPINT"F1- Tabla y explicac 

Un' 

100 LOCATE 6,6:PRINT"F2- Algunas leyes q 
¡tilicas" 

110 LOCATE 6.8:PRINT"F3- Nociones de for 
■ulación" 

120 LOCATE 6,!0:PPINT"F4- Finalizar" 
130 GOTO 130 

140 PEM • TABLA PERIODICA 
150 CLS 

160 PRINT: PRINT" C on es ta tabla te ser 
á lucho aás fácil realizar las forauiac 
iones de todo tipo de apuestos." 
170 PRINT" Su utilización es auv síe P 1 
e: 

180 PRINT" Los eleaentos están agrupad 
os por características en vez de por n2 
a- tóiico. Notarás que faltan algunos 

elementos cono el francio.gerisar.io, n 
obelio.uranio.plutonio..." 
190 PRINT" Esto es debido a que sólo s 
e en- cuentran los que en más coapuesto 
s hay en la Naturaleza." 
200 PRINT: FFINT: PRINT: PRINT: PRINT" 
ULSA UNA TECLA" 
210 I$=INKEY$:IF 1$="" THEN 210 ELSE 220 
220 CLS: COLOR 15,1. 1:SCREEN 2¡0PEN'&RP¡" 
ASil 

230 A$="C15B«10.0D10P180D100LB0U20L20U40 

L20D140L40U60L20U120" 

240 DRAW A*:LINE(10.10)-(1°0,10).15:LINE 

(0.0.'-(255,191>,15,B 

250 LINE>'10.30)-(190,30U! 

260 LINE(10,50)-(70,50},15:LINEI30,50)-( 

190,50), 15 

270 LINE(10.70)-(70.70!,15:LINE(90,70)-< 
190,70) 

280 LINE(10.90!-(70,90):LINE(?0.90)-(190 
,90) 




290 LINEU0,110)-f70,110) 
300 LINE!10,130.W70,130) 
310 LINE<30,150)-(70,150> 
320 LINE(30,170)-(70,170) 
330 LINE(30.190)-Í70.190) 
340 LINE(30.0>-(30,130) 
350 LINE(50,0)-(50.191) 
360 LINE(70.0)-(70J91) 
370 LINE(90,0)-(90,50) 
3B0 íimílhiMUÍkW 
390 LINE(130,0)-(130,110) 
400 LINE(150,0)-(150,110) 
410 LINE(170,0)-(170,U0! 
420 LINE(10,0)-(190,0),15 
430 LINE(190,0)-(190,10) 
440 PRESET(20.2):PRINTil,"0" 

450 PRFqPT f 4fl ?í 'PRTMTil " t " 



(40,2):PRINTtl,"l' 
460 PRESET(60,2) :PRINTtl, "2" 
470 PRESET (80, 2) : PRINTtl f "3" 
480 PRESET(100,2):PRINTtl,"4" 
490 PRESET (120, 2) : PRINT91 , "5" 
500 PRESET(140,2):PRINTI1, , 6" 
510 PRESET(160,2):PRINTtl,'7" 
520 PRESET(180,2):PRINTil,"B" 
530 REM POSICIONAHIENTO ELEMENTOS 
540 PRESET ( 12, 15) : PRINTtl , -He" 
550 PRESETÍ 12, 35): PRINTtl, "Ne" 
560 PRESET (12. 55) : PRINTtl, "Ar" 
570 PRESET(12,75):PRINTtl,"Kr" 
580 PRESET(12,95):PRINTtl, a ¡<e n 
590 PRESET (12,115); PRINTtl . "Rn" 



600 PRESET(37, 15) ¡PRINTtl, 'H' 
610 PRESET í 32, 35) ¡PRINTtl, "Li" 
620 PRESET (32, 55) : PRINTtl , "Na" 
630 PRESET (32, 75) : PRINTtl , "K" 
640 PRESET(32,95):PRINTtl,"Rb" 
650 FRESET (32, 115) : PRINTtl , "Cs" 
660 PRESET(32, 143) ¡PRINTtl, "Cu" 
670 PRESET (40, 133) ¡PRINTtl, "2" 
680 PRESET (32, 155) ¡PRINTtl, "Ag" 
690 PRESETÍ32, 180) : PRINTtl , n Au" 
700 PRESET (40, 172) : PRINTtl, "3" 
710 PRESET(52, 15) : PRINTtl , "Be" 
720 PRESET (52, 35 > ¡PRINTtl, "ílg" 
730 PRESET (52, 55) : PRINTtl , "Ca" 
7 40 FRESET(^2,75) :PRINTtl."Sr" 
750 PRESET (52, 95) ¡PRINTtl, "Ba" 
760 PRESET (52, 115) ¡PRINTtl, "Ra" 
770 PRESET (52, 135) ¡PRINTtl, "Zn" 
780 PRESET (52, 155) ¡PRINTtl, "Cd" 
790 PRESET (52, 180) ¡PRINTtl, "Hg" 
800 PRESETÍ60, 172) : PRINTtl . B 1 - 
810 PRESET-77, 15) : PRINTtl . »B" 
820 PRESET(72, 35) : PRINTtl , "Al " 
830 PRESET (97, 15) ¡PRINTtl, "C n 
840 PRESET(92.35):PRINTtl,'Si" 
850 PRESET(?2,60) : PRINTtl , "Sn " 
860 PRESET í 1 00, 54) : PRINTtl , "2" 
870 PRESET (92, 81) : PRINTtl , W 
880 PRESET ( 1 00, 74) : PRINTt i . "2" 
890 FPESET(U7.15);PFINTtl."N" 
m PRESETÍ112.35) rPRINTtl. c As- 
910 PPESET(117.55):PPINTtl,"P" 
920 PRESET(112,75):PRINTtl."Sb" 
930 PRESET (112, 95) ¡PRINTtl, "Bi" 
940 PRESETÍ137, 15) ¡PRINTtl, "0" 
950 PRESET(137,35):PRINTtl,"S" 
960 PRESET(132.55):PRINTtl."Se" 
970 PPESET(132,75):PRINTtl,'Te" 
m PRESET(132, 95) ¡PRINTtl. "Cr" 
990 PRESET (157, 15) ¡PRINTtl. "F" 
1000 PRESETÜ52. 35) ¡PRINTtl. "Br" 
1010 PRESET (152, 55) ¡PRINTtl, n Cl n 
1020 PRESET ( 1 57, 75) : PRINTt 1 . " I " 
1030 PPESETÍ152, 95) ¡PRINTtl, "Mn" 
1040 PRESET(172. 15) : PRINTtl , "Fe" 
1050 PRESET í 172, 35) : PRINTtl , "Cd" 
1060 PRESETÍ 172,55) :PRINTtl, "Ni " 
1070 PRESET ( 172. 75) : PRINTtl , "Pd" 
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1080 PRESET ( 1 72 , ?5 ): PR I NTt 1 Pf 

1090 PRESET (80, 175) :PRINT#1 , "Pulsa una t 
ecla. " 

1100 I$=INKEYÍ:IF 1$="' THEN 1100 ELSE 1 
110 

1110 CLQSEI1:CLS: COLOR 15,1,1: SCREEN 

1120 REM EXPLICACION TABLA 

1130 LOCATE 6,0:PRINT"EXPLICACION DE LA 

TABLA" 

1140 LOCATE, 2: PRINT"-Coluana 0= gases no 
bles" 

1150 L0CATE,4:PRINT"-Coluana 1 actúa val 

encía 1 y espe- cíales" 

1160 LOCATE, 6:PRINT"-Coluana 2 actúa val 

encía 2 y espe- cíales" 

1170 LOCATE, 6: PRINT"-Col uaná 3 actúa val 

encía 3" 

1180 L0CATE,8:PPINT n -Coluana 4 actúa val 
encía 4 y espe- cíales" 
1190 LOCATE, 10:PRINT"-Coluana 5 actúa va 
lencias 1,3,5 y especiales" 
1200 LOCATE, 12:PRINT"-Coluana 6 actúa va 
lencias 2,4,6 y especiales" 
1210 LOCATE, 14;PPINT"-Coluana 1 actúa va 
lencias 1.3,5,7 y especiales" 
1220 LOCATE, 16: PRINT H -Cal unna 3 actúa va 
lencias especia- les":LOCATE8,20:PRINT 
PULSA UNA TECLA": I$=INKEY$: IF 1$="" 
THEN 1220 ELSE 1230 
1230 CLS 

1240 'ELEMENTOS CON MAS DE 1 VALENCIA 
1250 LOCATE 3.0:PRINT"ELEMENTOS CON MAS 
DE 1 VALENCIA" 

1260 PRINT: PPINT" ESTOS ELEMENTOS SON 
: " 

1270 LOCATE 2,4:PRINT"N= 2'4 y valencias 
co luana 5" 

1230 LOCATE 2.6:PPINT"Cr= 3'f v valencia 
Is col uaná 6" 



1291 LOCATE 2,8:PPINT !, Mn= 2 ? 4'6 y *alenc 
i as columna 7" 

1300 LOCATE 2,10:PPINT"Fe,Co y Ni* sólo 
valencias 2'3" 

1310 LOCATE 2,12:PPINT"Pd= sólo valencia 
s 2 7 4" 

,1320 LOCATE 2; 14:PF:INT"Pt= sólo valencia 
s 2*4*6" 

1330 LOCATE 2. 16:PPINT D Cu= valencias 2 v 

r 

1340 LOCATE 2. 18:PRINT"Au= valencias 3 y 
1" 

1350 LOCATE 2.20:PF:INT"Hg=valencias ly 2 
■ 

1360 LOCATE 2.22:FRINT"Sn v Pb=valencias 
4 y 2" 

1370 Ií=INKEY$:IF 1$="" THEN 1370 ELSE R 
ETURN 80 

1380 REM LEYES QUIMICAS 

1390 CLS:LOCATE ó, 12: PRINT" ALGUNAS LEYES 
QUIMICAS" 

1400 FOP 1=1 TO 1000:NEXT I : CLS 
1410 LOCATE 4,0:PRINT"LEY DE LA CONSERVA 
CION DE LA MATERIA" 
1420 LOCATE 2,9:PRINT" Durante una reacc 
ión quíaica la aateria no es creada 
ni destruida" 

1430 FOR 1=1 TO 3000: NEXT I : CLS 
1440 LOCATE 10,0:PRINT n LEY DE PROUST" 
1450 LOCATE 2,7:PRINT"Los eleaentos cons 
tituyentes de un coapuesto están present 
es sieapre en una relación fija" 

1460 FOR 1=1 TO 4000:NEXT I:CLS 

1470 LOCATE 2,0:PRINT"LEY DE LAS PROPORC 

IONES MULTIPLES" 

1480 L0CATE2,4:PRINT"Cuando dos eleaento 
sse coabinan en-tre si en proporciones d 
iferentes, las distintas aasas de uno de 
los ele- aentos que se coabinan con una 
aisaa aasa del otro están entre si en u 
na relación de núaeros enteros" 
1490 FOP 1=0 TO 6000:NEXT I: CLS 
1500 LOCATE4,0:PRINT"LEY DE COMBINACION 
DE LOS VOLUMENES DE SAY-LUSS 

AC" 

1510 LOCATE, 6:PRINT"Cuando un gas reacci 

ona con otro, lo hace de aodo que la raz 

ón de los vo- lúaenes se exprese por núa 

eros ente- ros y pequeños. El volúaen obt 

enido será igual o nenor que la suaa de 

les volúaenes que entran en combinación 
» 

1520 FOR 1=1 TO 6000:NEXT I : RETURN 80 
1530 REM NOCIONES DE FORMULACION 
1540 KEYU) QFF: KEY (2) 0FF:KEY(3) OFFsKE 
Y(4) OFF 

1550 KEY ( i) 0N:KEY(2) 0N:KEY(3) 0N:KEY(4 



) 0N:KEY!5! DN: KEY (6 ) 0N:KEY(7> 0N:KEY(1 
0) ON 

1560 CL5:0N KEY 5GSUB 1680,1990.2090.222 
0.2910.3110,3510, .,3830 
1570 L0CATE9:PRINT"SUB MENU" 

1580 L0CATE9,1:PRINT" " 

15°0 L0CATE4,4:PRINT"F1= Hidruros" 
1600 L0CATE4.é:PRINT"F2= Oxidos" 
1610 LQCATE4.B:PRINT"F3= Peróxidos" 
1620 LOCATE4,10:PRINT"F4= Acidos" 
1630 L0CATE4.12:PRINT"F5= Hidróxidos o b 
ases" 

1640 L0CATE4,14:PRINT"F6= Sales" 

1650 L0CATE4,16:PRINT"F7= Métodos de noa 

en el atura" 

1660 LOCATE4,18:PPINT"F10= Menú Principa 
1" 

1670 SOTO 1670 

1680 REM HIDRUROS 

1690 CLS:LOCATE12:PRINT"HIDRUR0S" 

1700 L0CATE4,2:PRINT" El H.en sus ccabin 

aciones bina- rias.da lugar a tres tip 

os de compuestos:" 

1710 L0CATE2,4:PRINT"a) HIDRACIDOS (con 1 

os eleaentos no metálicos F,Cl,Br,I, 

S.Se.Te!" 

1720 LOCATE 2,3:PRINT"b) Coapuestos del 
hidrógeno con otros no metales(N,P 
,C.Si)" 

1730 LOCATE 2, 11:PRINT"0 Hidruros metál 
icos compuestos con metales" 
1740 LOCATE 6. 20:PRINT"pulsa una tecla" 
1750 I*=!NKEY$:IFI$="" THEN 1750 ELSE 17 
60 

1760 CLS 

1770 LOCATEB: PRINT "FORMULACION DE HIDPUR 
OS" 

1780 L0CATE2,2:PPINT"Para foraular los c 
ompuestos bina- rios del H hay que ten 
er en cuen- ta:" 

1790 L0CATE2,5:PRINT"-La colocación del 
eleaento que se coabinaüzquierda o d 
erecha del ft) Los eleaentos METALICOS 
se colocan a la izquierda y los que fo 
raan HIDRACIDOS a la derecha" 
1800 L0CATE2,15:PRINT"-La valencia del e 
leaento que se coabina con el H:" 
1810 LGCATE2, 18:PRINT"E1 núaero de átoao 
s de H que for- jarán parte de la aol 
écula es igual a la valencia del eleaen 
to, ya que la valencia del H es UNO" 
1820 LOCATE 9,22:PRINT'PULSA UNA TECLA" 
1830 I$=INKEY$:IF 1$="" THEN 1830 ELSE 1 
840 

1840 CLS 

1850 REM EJEMPLOS 
hidrácidos: " 
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1870 PRINT:PRINT"C1+H=HC1 Acido clorhid 

1880 PPINT:PRINT"S+H=H2S Acido sulfhid 
rico" 

1890 COLOR 15 

1900 PRINT: PRINT"E jenplos de coapuestos 
de H con otros no setales" 
1910 PPINT: PRINT"N + H=NH3 Amoniaco" 
1920 PRINT:PRINT"C+H=CH4 Metano" 
1930 COLOR 4 

1940 C0LGR15:PRINT:PRINT"Eje»plo5 de hid 
ruros netálicos:" 

1950 PRINT:PRINT-Li+H=LiH Hidruro de li 
tío" 

1960 PR I NT : PR I NT " Ca+H=CaH2 Hidruro de ca 
Icio" 

1970 PRINT:PRINT:PRINT" pulsa 
una tecla" 

1980 I$=INKEY$:IF 1$="" THEN 1980 ELSE R 
ETURN 1560 

1990 REÍ1 mí OXIDOS **** 
2000 CLS:LOCATE 1 « 1 2 : PR INT "EL OXIGENO Y 
SUS COMPUESTOS BINARIOS" 
2010 FOR 1=1 TO 2000:NEXT I:CLS 
2020 PRINT: PRINT" El oxígeno tiene núae 
ro de oxida- ción (2-). Actúa en valenc 
ia II. Se cofbina con casi todos los el 
emen- tos foraande ios OXIDOS." 
2030 PRINT:PRINT"Li(I)+Q(II)=Li20 Oxido 
de litio" 

2040 PRINT;PPINT"Ca(II)+Q(II!=CaO Oxido 
de calcio" 

2050 PRINT: PRINT" Existen elementos que 
se presentan en varios estados de oxida 
ción, y distintas valencias cobo el A 
u, Pd,Pt,Hg..." 

2060 PRINT" Para nombrarlos existen tres 
sis- tenas que los puedes ver ahora a 
1 terminar con los óxidos.' 
2070 PRINT: PRINT" PULSA UNA TECLA" 
2080 I*=INKEY$:IF 1$="' THEN 2080 ELSE R 
ETURN 1560 
2090 REM PEROXIDOS 
2100 CLS 

2110 LOCATE 10,12:PRINT"PEROXIDOS" 
2120 FOR 1=1 TO 15#0:NEXT 
2130 CLS 

2140 PRINT" Los peróxidos sólo pueden f 
orlarse con los eleaentos letales' 
2150 PRINT:PRINT" Su fonación es auy si 
■pie: ' 

2160 PRINT: PRINT" Sólo ha de foraarse el 

oxido con la layor valencia del eleaent 

o y suaar- le oxígeno. Al final no puede 

sin- plif icarse, pero si al principio 
■ 

2170 PRINT:PRINT" Ejenplo" 
2180 PRINT:PRINT"Peróxido de Au: Au203+0 
♦Au2Q4" 



2190 PRINT:PRINT"Peróxido de Pt: Pt206- 
W>PtQ3+0= Pt04" 



2200 PRINT: PRINT" PULSA UNA TECLA" 
2210 I$=INKEY$:IF 1$="' THEN 2210 ELSE R 
ETURN 1560 

2220 REM ACIDOS 
2230 CLS 

2240 LOCATE 13, 12: PRINT" ACIDOS" 
2250 FOR 1=1 TO 1000:NEXT I 
2260 CLS 

2270 LOCATE 13:PRINT"ACID0S" 

2280 PRINT: PRINT " Los ácidos son sustan 

cías que:" 

2290 PPINT: PRINT"a) Ceden protones<H+) e 
n medio acuc- so" 

2300 PRINT'b) Enrojecen la tintura de to 
rnasol" 

2310 PRINT:PFINT"c) La f enolf taleína, inc 

olora en ae- dio básico, sigue íncolor 

a en ae- dio ácido" 

2320 PRINT:PRINT"d) Presentan sabor agri 

o" 

2330 LOCATE 8.20:PF.INT'PULA UNA TECLA" 
2340 It=INKEY$:IF 1$="" THEN 2340 ELSE 2 
350 

2350 CLS 

2360 LOCATE 13: PPINT"ACIDQS" 

23 7 PRINT: PRINT" Las sustancias ácidas 

pertenecen a dos grupos de coapuestas. 

Unos.aque- líos que no contienen en s 
u aolé- cula y que reciben =1 nombre de 

hi- drácidos." 

2330 PFINT" Estos ácidos toaan la termin 
ación < hídriee > como ácido clorhidri 
co HC1." 

2390 PF INT: PF INT: PRINT" Otros ácidos con 
tienen en su ao- lécula v reciben el 
nombre de OXACI- DOS, de fóraula general 
HxMyOz. En esta fórmula general, 
M es casi siempre un no aetal. Los subí 
ndices x.y.z corresponden a números ent 

eros" 

2400 LOCATE 3,20:PRINT"PÜL5A UNA TECLA" 
2410 I$=INKEY$:IF 1$="" THEN 2410 ELSE 2 
420 

2420 CLS 

2430 LOCATE 10:PRINT"ACIDOS IMPORTANTES" 
2440 PRINT"Acidos importantes del grupo 
de los alogenos(Cl,Br e I) " 

2450 PRINT:PRINT"HC10 Acido hipodor 

050" 

2460 PRINT"HC102 Acido cloroso" 
2470 PRINT"HC103 Acido dórico" 
2480 PRINT"HC104 Acido perdórico" 
2490 PRINT:PRINT'Estos Bisaos-ácidos pue 
den foraular- se con el Br e I' 
2500 LOCATE 8.20:PRINT"PULSA UNA TECLA" 
2510 I*=INKEY*:IF 1$="" THEN 2510 ELSE 2 
520 

2520 CLS 

2530 LOCATE 10: PRINT" ACIDOS IMPORTANTES" 



2540 PRINT" del grupo de los anfigenos(S 

,Se,Te)" 

2550 PRINT 

2560 PRINT"H2S03 Acido sulfuroso" 
2570 PRINT"H2S04 Acido sulfúrico" 
2580 PRINT 

2590 PRINT" Cómo el S, se foraula el Se 
y el Te" 

2600 LOCATE 3.20:PRINT n PULSA UNA TECLA" 
2610 I$=INKEY$:IF 1$="" THEN 2610 ELSE 2 
620 

2620 CLS 

2630 LOCATE 10:PRINT"ACIDOS IMPORTANTES* 
2640 PRINT" del grupo nitrogenoideo(N,P, 
As)" 

2650 PRINT:PRINT"HN02 Acido nitros 
o" 

2660 PPINT"HN03 Acido nítrico" 

2ó?0 PRINT-H3PC3 Acido ortefosforos 
o" 

2680 PRINT "H3P04 Acido ortofosfóric 
o" 

2690 PRINT: PRINT" Cuando un elemento con 
igual grado de oxidación da distintos 
coapues- tos, para diferenciarlos se 1 
es ce- loca unos prefijos que indican s 
u mayor o aenor contenido de H2C." 
2700 PRINT" Estos prefijos son:" 

2710 PRINT" META > 1 MOLECULA DE A5U 

A" 

2720 PRINT" PIRO > 2 MOLECULAS DE AG 

UA" 

2730 PRINT" ORTO > 3 MOLECULAS DE AG 

UA" 

2740 LOCATE 3,20:PRINT"PULSA UNA TECLA" 
2750 I$=INKEY$:IF 1$="" THEN 2750 ELSE 2 
760 

2760 CLS 

2770 LOCATE 10:PRINT"ACIDOS IMPORTANTES" 
2780 PRINT" del grupo del carbonolC 
y Si)" 

2790 PRINT:PRINT"H2C03 Acido carbón 
ico" 

2800 PRINT-H2SI03 Acido metasilícic 
o" 

2810 PRINT"H4SI04 Acido ortosilicic 
o" 

2820 LOCATE 8,20:PRINT"PULSA UNA TECLA" 
2B30 I$=INKEY$:IF I$=INKEY$ THEN 2830 EL 
SE 2840 
2B40 CLS 

2850 PRINT"ACIDOS IMPORTANTES CON ALTO G 

RADO DE OXIDACION(Hn,Cr)' 
2860 PRINT: PRINT"HHn04 Acido peraan 
gánico" 

2B70 PRINT'H2Cr04 Acido cróüco" 
28B0 PRINT"H2Cr207 Acido dicróaico" 
2890 LOCATE8,20:PRINT"PULSA UNA TECLA" 
2900 I$=INKEY$:IF 1$="" THEN 2900 ELSE R 
ETURN 1560 
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Programa 



4io ir hto»tP*. 1. 1 x-a~ o«¡ mid«íp» 




ir C(OSCfniD«(P«. 1. 1 ) )-6DO0THCN 45 



2910 REM HIDROXIDOS 

2920 CLS:LOCATE 12, 10: PRINT-HIDROXIOOS" 

2930 FOR 1=1 TO 1500:NEXT I 

2940 CLS 

2950 LOCATE 5 : PR I NT ■ CAP. ACTER I ST I C AS PRIN 

CIPALES" 

2960 PRINT 

2970 PRINT- Las hidróxidos son sustancia 
s que:" 

29B0 PRINT"a) Azulean la tintura de torn 
asol enrojecida por los ácidos" 
2990 PRINT 

3000 PRINT-b) Enrojecen la fenolf taleina 

n 

3010 PRINT* el Son cáusticos. Su sabor re 
cuerda a la lejía." 
3020 PRINT: PRINT" Las bases están formad 
as por un ion metálico y el grupo OH-íox 
idrilo), anión negativo de grado de ox 
idación (l-)> Su formula general es II i OH 
)n. M, indica el elemnto ietálico i n su 

valencia. " 
3030 PRINT 

3040 PRINT'EjBWlo:- 
3050 PRINT 

3060 PRM'KQH Hidróxido de potas 

10" 

3070 PRINT"Fe(0)H2 Hidróxido de hierr 

0(111" 

3080 PRINT"Cr!0H)3 Hidróxido de cromo 
(III)" 

3090 LOCATE 8. 23 : PRINT " PULSA UNA TECLA" 
3100 I$-WKEY$;IF 1$="" THEN 3100 ELSE R 
ET'JRN 1560 

3110 CLS: REM SALES 
3120 LOCATE 10. 1 2: PP INT "SALES " 
3130 FOR 1=1 TO 1000! NEXT I : CLS 
3140 PRINT" Las sales son el resultado d 
e la u- nión de una especie catiónica co 
n una especie aniénica distintas a H- 
, 02- y OH-. Las sales se nombran se- g 
án procedan de los aniones senci- líos 
ode amones precedentes de los oxácido 
s." 

3150 PRINT 

3160 PRINT" Si proceden de aniones senci 
líos se nombra el eiementoacabado en * u 
ro » seguido del metal correspondiente:" 
3170 PRINT'Ejemplo:" 
31S0 PPINT"ClNa Clor-uro de sodio" 
3190 PRINT'ICu Yod-uro de cobre" 
3200 LOCATE 8,20:PRINT"FULSA UNA TECLA" 
3210 I*=!NKEY$:IF 1$="" THEN 3210 ELSE 3 
220 

^220 CLS 

3230 PRINT" En las sales de iones poliat 
órneos la terminación del oxácido caibi 
aba de « oso > a « ito > y el « ico > 



— 



por « ato 
3240 PRINT-.PRINT 

3250 PRINT'HCIO Acido hipodoroso" 
3260 PRINT"NaC10 Hipodonto de sodio" 
3270 PRINT U KC103 Clorato de potasio" 
3280 LOCATE 10, 12:PRINT"PULSA UNA TECLA* 
3290 I$=INKEY$:IF 1$="" THEN 3290 ELSE 3 
300 

3300 CLS 

3310 LOCATE 6:PRINT"CLASIFICACI0 DE LAS 
SALES" 

3320 PRINT:PRINT"Las sales pueden dasif 
icarse en:" 
3330 FOR 1=1 TO 3 
3340 PRINT 
3350 NEXT I 

3360 PRINT"Sales neutras no tienen H en 

su to- lécula v sa las áci das" 

3370 PRINT "Son sales neutras:' 

3380 PRINT:PRINT"AgCl Cloruro de olat 

a" 

3390 PRINT"BaS04 Sulfato de bario" 
3400 PRINT:PRINT"Son sales ácidas:" 
3410 PRINT: PRINT"NaHS Hidrógeno sul 
furo de sodio" 

3420 FRINT"LiHS04 Hidrógeno sulfato d 
e litio" 

3430 LOCATE 10, 20: PRINT "PULSA UNA TECLA" 
3440 I*=INKEY$;IF 1$="" THEN 3440 ELSE 3 
450 

3450 CLS 

3460 PRINT" Los ácidos que en su solécul 
a tie- nen más de un H pueden formar io 
nes sin necesidad de desprenderse de 

todo el H de su molécula:" 
3470 PRINT: PRINT 

3480 PRINT"H2C03-H+ — > HC03- Ión H car 
bonato" 

3490 LOCATE 10,20:PRINT"PULSA UNA TECLA" 
3500 Ií=INKEY$:IF 1$="" THEN 3500 ELSE R 
ETURN 1560 

3510 REM SISTEMAS DE NOMENCLATURA 
3520 CLS 

3530 PRINT" Existen tres sistemas de nom 
brar los compuestos:" 
3540 PRINT: PRINT 

3550 PRINT'a) El sistema Stock, en el qu 
e se lee el compuesto, óxidos o ácid 
os normalmente, indicando con un nú- 
mero el grado de oxidación del e- 
lemento. " 

3560 PRINTsPPINT" E^mplo:" 

3570 PRINT: PRINT"FeO Oxido de hierrod 

I) (dos) " 

3580 PRINT'Fe203 Oxido de hierro(III) (t 
res)" 

3590 LOCATE 10,20:PRINT"PULSA UNA TECLA" 
3600 I$=INKEY$:IF 1$="" THEN 3600 ELSE 3 



610 

3610 CLS:PRINT"b) Nomenclatura sistemáti 
ca:" 

3620 PRINT 

3630 PRINT"Utilizando los prefijos grigo 
s MONO-,DI-,TRI-,etc.En muchas oca 
sio- nes el prefijo mono no suele utili- 
zarse:" 
3640 PRINT 

3650 PRINT'FeO Monóxido de hierro" 
3Ó60 PRINT n Fe203 Trióxido de dihierro" 
3670 LOCATE 10,20:PRINT"PULAS UNA TECLA" 
3680 I$=INKEY$:!F 1$="" THEN 3680 ELSE 3 
690 

3690 CLS 

3700 PRINT"c)Nomenclatura antigua:" 

3710 PPINT 

3720 PRIN T " Si el óxido está hecho con u 
n no met?l se llamará anhídrido, con 
un metal óvido." 
3730 PRINT 

3740 cc !NT"Si el elemento X tiene tiene 
1 va- lencia se llamará oxido de X." 
3750 PRINT 

3760 PRINT" Si tiene 2 se usa la termina 
ción ^ oso * para la más ceoueña e 

* ico > para la mayor." 
3"70 PRINT 

3780 PRINT" Si tiene 3 se usa. en la más 
peque- ña « hipo » al prin- cipio y * o 
so * al final. En la mediana se le pone 

* ose * al final y al mayor se le 
oloca * ico i al final" 
37P0 PRINT 

3800 PRINT" Si tiene 4 se hace como si t 
uvira tres, i a la más grande se le po 
ne delante « per * y al finaH ico *. 
3810 LOCATE 10,22:PRINT"PULSA UNA TECLA" 
3820 I$=INKEY*:IF 1$="" THEN 3320 
ETUPN 1560 
3830 KEYC1J 0FF:KEY!2) 0FF:KEY(3) OFF:KE 
Y(4) 0FF:KEY(5) CFF:KEY(6) 0FF:KEY(6) OF 
F-.KEY (10) QFF : RETURN 60 
3840 CLS: END 
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Nombre y apellidos 



Calle 



SUSCRIBETE HOY MISMO SI 



QUIERES ESTAR EN VANGUARDIA. 



La primera revista de MSX de España en tu domicilio cada 
mes. Por el precio de DIEZ NUMEROS recibirás DOCE. 

Además tu condición de suscriptor te da derecho 
a descuentos y ofertas especiales en otos productos. 

LA. 



Deseo suscribirme a la revista 
STJPERJUEGOS EXTRA MSX 
a partir del número 



Ciudad 



Tel. 



Provincia 



FORMA DE PAGO: Mediante talón ban- 
cario a nombre de: 

MANHATTAN TBANSFER, SJL 

O/. RocaiBatlle, 10-18 
08083 Barcelona 



lamia 

da los números 
liéis exactamente el nuevo : 
distritos postales. Oreólas. 

TARIFAS: 

España por correo normal Ptas. 1.780,— 

Europa correo normal Ptas. 8.OO0- 

■nropa por avión Ptas. 8.800,- 

Amérlca por avión 88 USA t 



35 




Por Joseba López 



MERXE 



«Merxe» es un juego de marcianitos 
muy simple y que publicamos por la 
economía de instrucciones con que lo 
ha realizado su autor, aprovechando 
al máximo la potencia del BASIC 
MSX. 



10 



3? 



5* 



mmmmmmm 

í MERXE * 
t POP JOSEBA LOPEZ t 
t PARA MSX CLUB t 

tttmmmmmttt 

61 0PEN"GRP:"F0P OL'TPUTASfl: COLOR 15,4,4 
:60TQ 730 

70 V=0:T=10:C=0:L=0:FQP AB=0TQ 200 

80 Q=INT(RNDí 1) t256) : J= I NT (RND í 1 ) 1 1 92 ) : P 

SET(8.J),B:BEEP 

90 NEXT AB 

100 K=2:N=0:LINE(0.0!-(30,192),1,BF:LINE 
(140. 173W240.18?), 15, B:PRESET(150. 180) 
:PPINT#l."PUNTOS B :L:DRAW n Bfl0,192P256" 
110 DRAWBM0, 192E20R20F10U5R5E10R20F5R12 
P10D4P3 , J8F10F14" 

220 X=220:Y=100:DRAW"BN240,189D2 i :PAINT( 

30.1851.15 

130 PLAY-T250:XMU$; H 

140 5PR1TEI (0) =CHP$(&H1D! +CHP$ (&H7D) 

150 P=STRIG(RP):IF P=-1THENK=6ELSEK=2 

160 D=STICK CRP) 

170 IF D=3 THEN 

180 IF 0=5 THEN Y=Y+K. 

190 IF D=7 THEN 

200 IF D=l THEN Y=Y-K 

210 IF Y=0THEN Y=2 

220 IF Y= 182THEN Y=180 

230 PUT SPRITE 0,(X,Y).15,0 

240 5PRITE$ ( 1 ) =CHR$ í SeHIB) 

250 V=V+5 

260 PUT SPPITE1.(V,T).1,1 

2 7 IF V=250 THEN V=0: T=I NT (RND (5) • 165) : 

N=N+1:IF N=50 THEN 580 

280 IF V=X AND Y=T+1 0R V=X AND Y=T OR 

V=X ANDY=T-1 THEN C=C+100:LINE (200.175 
)-(235,187),4,BF:LINE(140,173)-(240,189) 
,15.B:PPESET(150. 180) ¡PRINTIl, "PUNTOS" ;C 
:PLAY"V15T250CE6" 
290 IF C=3000THEN 300ELSE 140 
300 X=X-2:BEEP:FORTY=1TO10:NEXT:BEEP:FOR 

SD=1TO10:NEXT 

310 IF X=0 THEN 530 ELSE LINE(0.50)-(15. 
150).8.BF:LINE(0.110)-(256,90),8.BF:Y=10 
0:GOTO 230 




320 FOR R=1TO200 

330 AA=INT(PND( 1)1256) 

340 BP= INT ( RND < 1 ) 1 192) 

350 PSET 'AA.BB) . 1:BEEP 

360 NEXT R 

370 FOR AS=1TO70 

380 CIRCLE(124.96),A6.B 

390 NEXT AS 

400 LINE (0.90)-(250,110),l.BF:MU$="V15O 
3DAGFÜE04D03AGFIE04D03AGFIGE' 
410 PPESET (7.95):PRINT#l."N0S ACERCAMOS 
AL PLANETA MERXE" :PLAY*T250; XMU$; XHUS;' 
420 FOR NM=1TO1000:NEXTNM 
430 SCREEN 0:KEY 0FF:60T0 680 
440 LGCATE 5 .0:PPINT "MIRA QUE AVENTURA 

n 

450 LOCATE 0,2:PPINT"t*»MtltMlt»**ttt 

umuummuv 

460 LOCATE 0, 4: PPI NT "Estados ante un pía 
neta sumaiente peligroso donde se hay 
an las puertas del universo. Tu las tiene 
s que atravesar,-/ para ello harás 
lo siguiente: 

470 LOCATE 0, 10:PRINT"Hav una fuerza de 
gravedad contra ti. para vencerla tendrás 
que recoger lossatelites de energia.Con 
3000 puntos lo pasaras. Utiliza el botón 
de disparo o la barra espadadora 



para acelerar (respectivamente) . " 
480 LOCATE 0. 17:PRINT"E1 nuiero de satel 
ites no es infinito osea que no dejes es 
capar ni uno." 

490 LOCATE 0.20:PRINT"mmmmmm 

nmmmnnittv 

500 FOR XC=1TO10000:NEXTXC 
510 SCREEN 2,1 
520 GOTO 70 

530 FOR RT=1TO2000:NEXTRT 
540 SCREEN 

550 LOCATE 5. 10:PPINT"///LO HAS CONSEGUI 

Dowr 

560 FOR HN=1T0 2000 : NEXT: CLS 
570 GOTO 630 

580 FOP SQ 3 ITC1000: NEXT: SCREEN 

590 LOCATE0.6:PRINT n SE ACABARON LOS SATE 

LITES DE ENERGIA" 

600 LOCATE5.10:PRINT"|| LO SIENTO. HAS PE 
RDIDO H":PLAY n CCCCC":FOP G0 
T:CLS 

610 FOP CX=1TO1000 
620 GOTO 630 
630 LOCATE 2, 10: INPUT "¿QUIERES JUGAR 0T 
RA VEZ";L$ 

640 IF L$="SI"THENSCREEN 2.1: GOTO 70 
650 IF L$="N0"THENCLS: GOTO 660ELSE630 
660 LOCATE 10.10:PRINT "ADIOS...." 
670 PLAY u CCCCCCCC":FOR LW= 1 TO2000: NEXT: C 
LS: END 

680 LOCATE 0.6: INPUT'QUIERES CONTROLAR C 
0N J0ISTICK CON 

LOS CURSORES (A/B)":T$ 
690 IF T$="A"THEN RP=1 
700 IF T$="B"THEN PP=0 
710 CLS 



730 SCREEN 3 

740 PPESETÍ0.30) :PPINT#1, 1 



JOSEBA 



750 FOR HG=1T0 1500:NEXT 
760 CLS:PRESET(7.40):PRINTI1." 
770 LINE (0.30)-(230.78),15,B 
780 FOR ERT=1TO2000:NEXT 
790 CLS:SCREEN 2.1:6010 320 
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Test d 



Merxei 



10 - 58 
20 - 58 
30 - 58 
40 - 58 
50 - 58 
60 -245 
70 -222 



"0 - 6 

100 -221 

110 -193 

120 -129 

130 -132 

140 - 34 

150 - 47 



170 -172 
180 -139 
190 -176 
200 -136 
210 - 25 
220 -125 
230 -108 



250 -162 
260 - 91 
270 - 41 
280 - 
290 - 38 
300 -180 
310 -141 



330 - 22 
340 -244 
350 -125 
360 -213 
3 7 - 69 
380 - 56 
39* - 23 
-18" 



410 -222 
420 - 86 
430 - 66 
440 -180 
450 - 73 
460 -166 
470 - 77 



490 - 89 
500 -162 
510 - 22 
520 -221 
530 - 88 
540 -214 
550 - 74 
-123 



570 - 15 
580 -200 
590 - 42 
600 -109 
610 -254 
620 - 15 
630 - 72 
64 



650 - 12 
660 -109 
670 -154 
680 -138 
690 -244 
700 -244 
710 -159 



730 -217 
740 - 4 
750 -165 
760 - 89 
770 -227 
780 -247 
790 - 1 




ns^ xclu b 




K§X£iub| 




MMr 




LOCO UN 


ENGUAJE DIDACTICO 


N.° 8 - 


150 PTAS. 





N.° 11 - 175 PTAS. N.° 12 -175 PTAS. N.° 13 - 175 PTAS. N.° 14 - 175 PTAS. N.° 15 - 175 PTAS. N.«*16 y 17 - 350 PTAS. 




2 




msxciub 




N.° 18 - 175 PTAS. IN.° 19 - 175 PTAS. E. SOFTWARE 275 PTAS. N.° 20 - F75 PTAS. 




¡SI TE HACE FALTA ALGUN NUMERO DE IHfM PIDELO HOY MISMO! 

Para contar con la más completa colección de programas de MSX sólo tienes que recortar o fotocopiar el cu- 
pón y dirigirlo a Dpto. Suscripciones MSX CLUB DE PROGRAMAS. Roca i Batlle, 10-12. 08023 Barcelona. 

BOLETIN DE PEDIDO , 

Sí, deseo recibir hoy mismo los números de MSX CLUB DE PROGRAMAS, libre de 

gastos de envío, por lo que adjunto talón n." del Banco/Caja i 

por el importe de ptas. a nombre de MANHATTAN TRANSFER, S.A. 

NOMBRE Y APELLIDOS 

CALLE . N." CIUDAD 

PP .. .. ... ..I..:........* PROVINCIA ...„<«.....„ TEL. J 
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Programa , 



Por Enrique Roldán, 




2 



10 COLOR 15,1,1 
20 C=15 

30 0PEN-6RP: "ASI 

40 DEFUSP1=65:DEFUSP2=Ó8 

50 CLS 

60 SCREEN 2 

70 PSET(0.0) 

80 A=USR1(0) 

90 FOP 1=1 TO B00:PRINT#l/r;:NEXT I 
100 A=USR2(0) 

110 IF INKEYfÓ* ' THEN 110 

120 LINE(100,1)-(170,191),1,BF 

130 LINE(100,1)-(170,191).15,B 

140 DRAWBM130, 12M134, 1R26M165. 27r1163 ( 38 

11162,6611159. 82Í1156,81M152,71I1154,57I1152, 

13H132,8H118,42BM162,56Í1158,55U3H160,53I1 

162,3BR2" 

150 DR AN ■ B«l 39 . 48H 1 4 1 . 52H 1 44 . 47M1 52 , 55M 1 

44,51H141,55!1139,48Br1119,47M128,41r1130,4 

7H133.44I1130, 5111127, 44H119.47" 

160 DRftM'BH133,47r1135,48H130,63H132,61Hl 

3B,63D2H130,63m29 l 69r113B,72t1138,65r1140. 

56" 

170 CIPCLE(126,51),2,15,,,1.4:PAINT(126, 

51>,15:CIRCLE(126,53>,4,15,.,1.4 

180 CIRCLE<:146,58) .2, 15, , , 1. 4:PAINT( 146. 

58) , 15:CIRCLE (146, 61) ,4, 15, „ 1.4 

190 DRAM n Br1123,44H119.43r1119,60H130.63BH 

138,67H143,68r1139,60r1138,67r1152,70" 

200 DRAH'BMl 19, 55M1 12, 66M1 10, B7H1 46, 100H 

148,8BH134,78r1124,78r1124,8BH145.95r1146,l 

00BH 1 24 , 88M 1 1 8 , 90BH 1 24 . 78H 1 1 6 , 76 " 

210 CIRCLE(116,83),6,15,.,1.B 

220 DRAW"BH155, 101P1M159.82L2M155. 101H14 

6.98BH155,101«151,101H110.95H110.88BM110 

,9WUB,UlH142,i22Hl51 f UI" 

230 DRAWBM126. 115M130, 132M136, 144M154, 1 

06M162, 108M160, 150M112, 145M114, 104BM154, 

107H143, 13611140,135" 

240 DRAM-BM112, 138H102, 136M102, 189M16Ó, 1 

B9H170, 145M160, 144BH132, 147D6R4U6BH112, 1 

5BH111, 171M159, 174H159, 164M112, 158" 

250 LINEí 160, 133)-í 170, 133) .15 

260 DRAN"BHi60,105f!160,78H170.81BI1162.67 

«170,81" 

270 DRAWBM112, 127M102, 126H103, 104M100, 1 
03BH103,104H107,79L7Bf1107,79r1108,72R4BHl 



En esta versión de su programa gráfi- 
co su autor lo presenta en blanco y 
negro y del mismo modo que en 
Graf-1, puede cambiarse el color de 
los ojos pulsando la barra espaciadora 
pulsado 1 cambia el color del ojo 
el 2 el del otro. 




12, 67H100,60U2nl 12. 65BH100, 39M120, 48" 
280 LINE(162,63)-(170,67),15 
290 KI=INKEY$ 

300 IF K$=" " OR K$="l" OR K$="2" THEN 
GOSUB 320 
310 GOTO 290 

320 C=C+1: IF C=16 THEN C=2 

330 IF K.$=" " THEN GOSUB 360:6OSUB 400 

340 IF K$="l" THEN GOSUB 360 

350 IF K$="2" THEN GOSUB 400 

360 CIRCLE(126,51),2, 1 , , , 1 . 4: PAINT ( 126, 5 

t)',l 

370 CIRCLE(126,51),2,C,,,1.4:PAINT(126,5 
1),C 

380 IF K$=" f THEN GOTO 400 ELSE 6OT0 
430 

390 RETUPN 

400 CIRCLE(146,5B),2,1,,,1.4:PAINT(146,5 
8),1 

410 CIRCLE(146,5B) ,2,C, , , 1 . 4: PAINT ( 146, 5 

B),C 

420 RETURN 430 
430 RETURN 



Test de listado tm^mm 


10 - 87 


200 - 2 


390 -142 


20 - 80 


210 -165 


400 -150 


30 -220 


220 -190 


410 -199 


40 -200 


230 -193 


420 - 75 


50 -159 


240 -105 


430 -142 


60 -216 


250 -117 




70 - 97 


260 - 30 




80 -129 


270 -215 




90 - 64 


2B0 -239 




100 -130 


290 - 74 




110 -239 


300 -120 




120 -153 


310 -186 




130 - 95 


320 -173 




140 -152 


330 -113 




150 - 62 


340 - 60 




160 -142 


350 -101 




170 -135 


360 -123 




180 -162 


370 -172 


TOTAL: 
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YAMAHA 



3 l c 



MUSIC COMPUTER 



YAMAHA HAZEN 

Carretera de La Coruña, km. 17,200 / Teléfono 637 76 46 / Télex 42454 HAZEN E / 28230 Las Rozas de Madrid 



Porque nadie puede resistirse a la tentación del 
MSX de Philips. A sus divertidos juegos de aventuras. 
A sus entretenidos programas educativos. O a los 
de oficina, como el "Home office". Capaz de hacer 
estadísticas, estudio de cuentas, contabilidad, etc. 



Y los programas específicos para hacer más fácil el 
trabajo al ama de casa. O al estudiante. Además, posee 
una amplísima gama de periféricos: impresoras, 
monitores, ratón, etc. Disfrute con el MSX de Philips. 
Siempre que no esté ocupado. 



PHILIPS 




Philips integra su futuro. 



PHILIPS 



